Zitat von
inherited:
Delphi-Quellcode:
repeat
try
tcpclient1.Connect;
except
inc(TriesToConnect);
end;
until tcpclient1.Connected;
Bedenke aber, dass das nicht unbedingt die beste lösung ist, so wie du das machen willst!
Öhm... dann hängt sich das Programm auf. Außer, da kommt ein Application.ProcessMessages; rein, das Connect kommt in einen Timer / Thread. Vielleicht sollte man auch noch andere Abbruchbedingungen einbauen.
Von der Grundidee aber richtig.
MfG
Freak