Zitat von
Sebastian R.:
Komisch, müsste eigentlich klappen. Nimm mal eine while-Schleife.
Delphi-Quellcode:
while s <> '' do begin
Application.ProcessMessages;
s := Command_TCP.ReadLn;
if s <> '' then
begin
Listbox1.Items.Add(s);
end;
end;
Command_TCP.Disconnect;
Oder du schreibst einfach so etwas in das OnRead/OnExecute-Event:
Delphi-Quellcode:
// Indy-Beispiel
begin
ListBox1.Items.Add(AThread.Connection.ReadLn);
end;
MfG, Sebastian R.
[EDIT]Ich habe nochmal deinen Text oben gelesen. Du hast ja eine Schleife in dem Timer drin. Der wartet solange bis was ankommt. Aber wenn der Interval auf 300 ms steht, dann führt der das ja zu oft aus![/EDIT]
OK das mit der while Schleife bringt nix, TIdTCPClient hat kein OnRead oder OnExecuet Event.
Auf wieviel soll ich den Timer denn dann stellen? Oder gibt es eine bessere Methode als das mit einem Timer zu realisieren?
greetz