Ich versuche über TTcpClient eine
FTP-Verbindung herzustellen und das macht auch keine Probleme, aber das Verbindung kappen macht mir sorgen. Derzeit sehen meine Commands wie folgt aus:
Code:
USER freq9
PASS test
CWD downloads/
QUIT
Aber wenn ich dann auf meinem Linux-Rechner nachschaue ist die Session weiterhin aktiv. Im Code sieht es wie folgt aus:
Delphi-Quellcode:
.
try
with TcpClient do
begin
RemoteHost := '192.168.1.13';
RemotePort := '21';
Active := True;
Sendln('USER freq9');
Sendln('PASS test');
Sendln('CWD downloads/');
Sendln('QUIT');
Disconnect;
Active := False;
Close;
end;
finally
TcpClient.Free
end;
Diese recht komische Folge kan nun zustande, weil die Session einfach nicht gekillt wird:
Delphi-Quellcode:
.
Sendln('QUIT');
Disconnect;
Active := False;
Close;
Auf meinem Linux-Server wo ich einen
FTP-Server am laufen habe (mit anderen
FTP-Clients getestet) habe ich dann in den Prozessen folgenden Eintrag:
Code:
freq9 357 0.0 0.4 6388 2404 pts/2 S+ 01:08 0:00 proftpd: freq9 - zeev: IDLE