TClientsocket soll warten in Thread

[Schwedenbitter]

Zitat von shmia:

Versuch' mal statt einem Sleep: ...

oder auch so (edit: OHNE THREAD):

Delphi-Quellcode:

Procedure Delay(Zeit: DWord);
Var
   Start         : DWord;
Begin
   Start:=GetTickCount;
   While (GetTickCount - Start) <= Zeit Do
      Application.ProcessMessages;
End;

So mache ich das.

Gruß, Alex