Hallo,
Zitat von
L85:
try und except geht nicht
was soll das heißen? Hast du vielleicht in der
IDE eingestellt, dass angehalten werden soll, wenn eine
Exception geworfen wird?
Delphi-Quellcode:
function GetFile(
ftp: TIdFTP;
const fnRemote, fnLocal: TFileName): Integer;
begin
with ftp do
try
Connect;
Get(fnRemote, fnLocal);
Disconnect;
Result := 0;
except
on e: EIdSocketError
do
Result := e.LastError;
end;
end;
Grüße vom marabu