Hi
Bei Abschlus enes Downloades per
FTP in Routine "FTPWorkEnd"
wird ein Tobject zum TidFTP gecastet, damit dir Verbindug geschlossen werden kann
Delphi-Quellcode:
procedure FTPWorkEnd(self : TObject; Sender: TObject; AWorkMode: TWorkMode);
begin
form1.Debug_Memo.Lines.Add('FTPClientWorkEnd' + formatDateTime('hh:nn:ss:', now));
//Schliese den FTPClient im Array.
TidFTP(Sender).Disconnect;
end;
durch geheimnisvolle Umstände funktioniert das nicht mehr....!!!
Beim Debuggen hat der "Sender" igrentwelche daten, nicht aber die eines TidFTP
die Routine wurde einem Socket im Variablen array folgendermaßen zugefugt
@FFTPConnections[high(FFTPConnections)].FFTPConnction.OnWorkEnd := @FTP1WorkEnd;
Hatte jemand das gleiche Problemm....!?