habe es folgender massen versucht nur leider funkt. nicht
Code:
server:
...
var
b:string;
str:tstream;
begin
b:=athread.connection.readln;
if b='test' then begin
try
str:=TMemoryStream.Create;
treeview1.SaveToStream(str);
str.Position := 0;
athread.connection.OpenWriteBuffer;
athread.connection.WriteStream(str, true, true, 0);
athread.connection.CloseWriteBuffer;
except
athread.connection.CancelWriteBuffer;
-------------------
client:
...
var
str:tstream;
begin
try
idtcpclient1.writeln('test');
str:=TMemoryStream.Create;
ReadStream(str);
treeview1.loadfromstream(str);
finally str.Free;