TIdFTP und falsches Systemdatum + Systemzeit

[shmia]

Du gehst bei der Fehlersuche noch nicht systematisch vor.
Du hast 2 Aufgaben a.) einlesen der Parameter aus dem Inifile b.) FTP-Download
Also trenne diese beiden Aufgabe doch mal.
Dann kommt ein (Test-)Button aufs Formular:

Delphi-Quellcode:

procedure TMain_Form.Button42Click(Sender:TObject);
begin
   Assert(Assigned(FTP));
   // um sämliche Fehler auszuschliesen
   // werden hier die Parameter hartcodiert zugewiesen
   // (nur für Test)
   FTP.Host := 'hostname' 
   FTP.UserName := 'user'; 
   FTP.Password := 'password'; 
   if not DownloadFTPFile then   // die Funktion für den FTP dwonload
      ShowMessage('Download fehlgeschlagen');
end;

Du kümmerst dich weder um das Datum noch um die INI-Datei!!!
Jetzt diesen Button mehrfach drücken und schauen was passiert und die downgeloadete Datei anschauen.
Ich denke das Prinzip sollte jetzt klar sein:
Problem in Teilaufgaben zerlegen und beweisen, dass jede Teilaufgabe für sich funktioniert.