[indy] treeview übertragen

[the_seed]

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?