ich versuche gerade eine .txt fil von einem
Ftp runterzuladen
doch will es noch nicht ganz klappen i.wie... in moment versucht er was zu laden
doch dann kommt ne meldung "no such direction" und wenn ich dann noch debugge
dann erstellte eine leere .´txt dtei mit dem name test.txt:
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
vAR success: integer ;
localfilename: widestring ;
remotefilename: widestring;
begin
ftp.Host := '
xxxx';
ftp.Port := strtoint(edit2.text) ;
ftp.Username := '
xxxx';
ftp.Password := '
xxxx';
try
ftp.Connect();
exept
showmessage('
keine verbindung');
if ftp.connected
then begin
showmessage('
verbindung vorhanden');
end;
begin localfilename := '
test.txt' ;
remotefilename:= '
neu.txt' ;
ftp.get(remoteFilename,localFilename);