resourcen schonendes readln vom Server

[theomega]

Hallo
ich versuche gerade in Delphi mit den INDY VCL ein Server, Client Gespann hinzubekommen. Nur wie prüfe ich am besten ob der Server etwas gesendet hat (am Client)?

bis jetz habe ich das in einem Timer so:

Code:

if client.Connected then begin;
  s:='';
  repeat;
  s := client.ReadLn;
  vera(s);
  until s='';
end;

wobie vera() die Sache auf den Bildschirm ausgibt. Denn Timer hab ich auf 1000 mSek gesetzt. Jetzt kriecht mein Programm aber nur noch so vor sich hin. Ist ja auch klar, jede Sekunde wird geprüft ob was da ist.
Gibt es da keine andere Möglichkeit als mit dem Timer?

Danke

b.dominik