Indy ReadLn - TimeOut funzt nicht

[smudo]

Hallo ,

ich hatte hier schon mal mein Problem geäußert.

Ich lese mit ReadLn die Zeilen aus, welcher mir der Server nach einer gewissen Zeit bereitstellt. Vom Zeitverhalten konnte ich das ganze so umbauen, dass es bis zum Empfang der 1. Zeile nicht länger als 300 Sekunden dauert.
ReadLn wartet also so lange, bis die erwartete Zeile eingetroffen ist.
Um das zeitlich zu begrenzen, gibt es ja die Möglichkeit der Übergabe eines Timeoutwertes.
Das wollte ich hiermit mal testen:

Delphi-Quellcode:

c:=GetTickCount;
s:=ReadLn(#10,1);
ShowMessage(IntToStr(GettickCount-c)+': '+s);

Ich bin mir jetzt nicht sicher, ob es sich bei dem TimeOut um Millisekunden oder Sekunden handelt, auf jeden Fall dürfte es doch wohl nicht möglich sein, dass c den Wert 5547 annimmt. Macht er aber

Was muss ich anders machen?

Danke im Voraus

René