Jetzt habe ich die
Indy-Variante mal ausgebaut.
Delphi-Quellcode:
procedure TForm3.Timer1Timer(Sender: TObject);
var
bytecount : integer;
vBufferIn: TIdBytes;
begin
bytecount := indyclient.IOHandler.InputBuffer.Size;
indyclient.IOHandler.ReadBytes(vBufferIn, bytecount, false);
end;
InputBuffer.Size bleibt bei 0.
Interessanterweise sind die Daten da wenn ich den Client per disconnect trenne.
@ Klaus: wo gibt es denn den TTcpListener und wie wird das onexecute gefeuert?
Denn ich muss einen Datenstrom mit 20kb/s einlesen, was bei 32768k Buffergröße schon etwas häufiger stattfinden muss. Da bietet sich ein Timerevent ja an.
Danke, Messie