weiß jmd wieso folgendes kleines prog bei button1.click sprich befehl zum uppen einer datei hängen bleibt?
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
IdFTP1.Host := '
ftp.host.de';
IdFTP1.Username := '
user';
IdFTP1.Password := '
pw';
IdFTP1.Connect;
IdFTP1.ChangeDir('
/');
IdFTP1.Put('
c:\test.txt','
test.txt');
IdFTP1.Quit;
IdFTP1.Disconnect;
end;