TClientsocket soll warten in Thread

[uoeb7gp]

Ok, die Komponente ist auf ctNonBlocking gestellt, dadurch kommt ein
Asynchronen Client Socket zur Anwendung.

Dieser Client Socket wird somit durch Windows Messages mit Events versorgt.
Da brauchst Du nichts mehr selber zu implementieren, macht alles die "Black Box".

Also einfach einen Timer verwenden, und periodisch alle 30 sec ein send durchführen.

Sieh dir mal das mit Delphi mitgelieferte Chat Demo an.

lg.