Zitat von
SirThornberry:
naja, du musst nach "SaveToStream" noch die Position des Streams auf 0 setzen
Delphi-Quellcode:
var LStream: TMemoryStream;
begin
LStream := TMemoryStream.Create;
TreeView1.SaveToStream(LStream);
LStream.Position := 0; // <== Die Zeile habsch vergessen gehabt
//stream senden (mit welcher compo du das auch immer machst)
IdTCPClient1.Connect;
IdTCPClient1.WriteStream(LStream);
LStream.Free;
end;
so weit hatt ichs ja
nur wie enpafneg ich den stream?
Code:
var LStream: TMemoryStream;
begin
idtcpclient1.Connect;
LStream := TMemoryStream.Create;
idtcpclient.writeln('test');
idtcpclient1.readStream(LStream);
treeview1.loadfromstream(lstream);
lstream.Free;
->kommt ne fehlermeldung -> expandieren des streams wegen speichermangels nicht möglich?