CPU Last bei 100% bei client := listener.AcceptTcpClient();

[BenjaminH]

Zitat von winx:

  while(true) do begin

Das Problem ist, das sich das true nie ändern wird, die Schleife wird unendlich oft wiederholt werden.
du solltest statt dem True irgendeine Bedingung verwenden.