Zitat von
Basti1207:
Joa, gesagt getan..
Delphi-Quellcode:
try raise EIdConnClosedGracefully.Create(RSConnectionClosedGracefully);
except;
end;
Jetzt tritt zwar keine Fehlermeldung mehr auf, jedoch bleibt das Programm hängen..
Die
Exception muss nicht in der
Indy-
Unit mit try ... except umgeben werden, sondern im eigenen Code.
Also im einfachsten Fall (catch-all):
Delphi-Quellcode:
try
IdFTP1.Connect;
// ... tu was mit FTP
IdfTP1.Disconnect;
except
on E:
Exception do
begin
ShowMessage('
Ups, eine Exception ist aufgetreten: ' + E.
Message);
end
end;