Finde Fehler in Programm nicht

[Klaus01]

Guten Abend,

versuche mal aus connect ein ftp.connect zu machen.

Delphi-Quellcode:

procedure TFormMain.FormCreate(Sender: TObject);
var Update, Befehl, BefehlText:TStringList;
i:Integer;
begin
 FTP.Connect; // <---

 Update:=TStringList.Create;

 CreateDir('tmp');
 FTP.Get('updates.txt','tmp\updates.txt',true);
 Update.LoadFromFile('version.txt');
 VersionAk:=Update[0];
 Update.Clear;
 Update.LoadFromFile('tmp\updates.txt');

und dann auch in der Methode update.

connect ist hier die methode von TForm und nicht von tidFtp daher scheint der Aufruf connect in Ordnung zu sein.

Warum rufst Du die Methode update nicht im form.create auf?
Don't repeat yourself (DRY)

Grüße
Klaus