Hallo,
danke für die Hinweise:
@SirThornberry:
Ich habe die Variante
Code:
IdFTP1.Connect(true, edChkTime.ValueInt * 1000); // mit edChkTime.ValueInt = 30
ausprobiert, bin aber sofort mit Fehler # 10065 rausgeflogen.
Nachfolgende Version hat zumindest auf meinem PC funktioniert:
Code:
....
zel := 0;
repeat
inc(zel);
try
IdFTP1.Connect;
except
Label.Caption := IntToStr(zel) + '. Versuch';
Label.Refresh;
end;
until IdFTP1.Connected or (time > dt); //or (zel > 3) or (clock.Tag = 0);
....
Ist vielleicht nicht die ideale Lösung, aber wenn's hilft ....
Ob damit mein Problem gelöst ist, erfahre ich aber erst nächste Woche.
mfg
eddy