Entwickler-Ecke
Internet / Netzwerk - ftp programm läuft nich
nepleurepas - Mo 31.03.08 18:27
Titel: ftp programm läuft nich
Hallo,
ich wollte ein kleines, sehr einfaches programm machen um mit einen ftp server zu connecten, um indy etwas kennen zu lernen. Ich versteh einfach warum folgendes nicht funktioniert:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
| function getit(adress, name, pass: string): Tstrings;
begin
with form1 do
begin
idFTP1.Username:= name;
idFTP1.Password:= pass;
idFTP1.Host:= adress;
idFTP1.Connect;
idFTP1.List(result);
end;
end;
procedure TForm1.Button2Click(Sender: TObject);
var name, adress, pass: string;
begin
name:= edit1.text;
adress:= edit2.Text;
pass:= edit3.Text;
listbox1.Items:= getit(adress,name,pass);
end; |
es erscheint eine meldung "login incorrect".
an den zugangsdaten liegts nich, habs mit filezilla getestet.
Kann mir jemand helfen?? wär sehr dankbar
stefan
Moderiert von 
Christian S.: Topic aus Delphi Language (Object-Pascal) / CLX verschoben am Mo 31.03.2008 um 18:33
nepleurepas - Mo 31.03.08 18:58
jetz versteh ich die welt nich mehr...
hab mir mal mit showmessage die sachen anzeigen lassen, die in der function getit ankommen.
showmessage(name) in zeile 5 im code oben lieferte "Form1"!!!!!
was is da los??
ich verzweifel
Delete - Mo 31.03.08 19:02
name ist bei dir eine lokale Variable aber auch eine Eigenchaft von TForm. Benenn sie um.
nepleurepas - Mo 31.03.08 19:03
ahhhh, right, danke. sowas dummes aber auch ;-)
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!