Der
FTP socket (client) wird folgendermaßen geschlossen
Delphi-Quellcode:
procedure FTPAfterGet(self : TObject; ASender: TObject; VStream: TStream);
var
i, n : integer;
begin
try
[u] TidFTP(ASender).Disconnect;[/u]
except
form1.Debug_Memo.Lines.Add('Error while closed FTPClientSocket' + formatDateTime('hh:nn:ss:', now));
end; //try
form1.Debug_Memo.Lines.Add('FTPClientAfterGet' + formatDateTime('hh:nn:ss:', now));
end;
Leider entsteht auf der
FTP serverseite ein EConnClosedGracefuly
exception (in den Debug Optionen habe ich sie eingeschlossen - trotzdem kommt wieder) oder eine EAccessViolation was auf ein nicht initialisiertes objeckt hinweist. diese beiden Fehlermeldungen entschtehen in Abwechlung auf der Serverseite beim schliesen der FTPclient verbindung.
Liegt es vieleicht an dem zeitpunkt wo der
FTP client geschlossen wird (afterget), weil der socket noch zur der Zeit daten dahin schreibt...!?