the editor unindents now on pressing }. have fun!

- fixed bugs... lalala
- updated debug-list
- fixed comment-bug
- now final edition...
This commit is contained in:
Christian Hammacher 2005-07-23 21:25:25 +00:00
parent 842813dcbb
commit 7fc97524e2
2 changed files with 4 additions and 1 deletions

View File

@ -612,7 +612,7 @@ begin
except
on E: Exception do begin
if not Cancel then
MessageBox(frmMain.Handle, PChar('An error occured while uploading "' + FileList[i] + '"!' + #13 + E.Message), PChar(frmMain.Caption), MB_ICONSTOP);
MessageBox(frmMain.Handle, PChar('An error occured while uploading "' + FileList[i] + '"!' + #13 + E.Message), PChar(Application.Title), MB_ICONSTOP);
Screen.Cursor := crDefault;
Application.Terminate;
exit;

View File

@ -154,6 +154,9 @@ var ePath: String;
eOS: TOS;
begin
if jplWizard.ActivePage = jspFTP then begin
if not IdFTP.Connected then
IdFTP.Connect;
{ FTP }
eStr := TStringList.Create;
ePath := '/';