Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - Problem mit Stream


memox - Di 31.03.09 17:30
Titel: Problem mit Stream
Hallo,

Folgender Code sollte doch eigentlich den Inhalt aus memo1 in memo2 kopieren. Aber es funktioniert nciht. Wo liegt mein Denkfehler?


Delphi-Quelltext 
1:
2:
3:
4:
5:
6:
7:
 
var tss : TMemoryStream;
begin
  tss := TMemoryStream.Create;
  memo1.Lines.SaveToStream(tss);
  memo2.Lines.LoadFromStream(tss);
  tss.Free;
end;


Moderiert von user profile iconNarses: Code- durch Delphi-Tags ersetzt


Gausi - Di 31.03.09 17:33
Hallo und :welcome: in der Entwickler-Ecke,

Setz mal zwischen speichern und laden die Position im Stream wieder auf Anfang, also

Delphi-Quelltext 
1:
2:
3:
4:
5:
6:
7:
8:
 
var tss : TMemoryStream;
begin
  tss := TMemoryStream.Create;
  memo1.Lines.SaveToStream(tss);
  tss.Position := 0;
  memo2.Lines.LoadFromStream(tss);
  tss.Free;
end;


Dann gehts. :D

Edit: Einfacher gehts natürlich so ;-).


Delphi-Quelltext 
1:
 
Memo2.Lines.Assign(Memo1.Lines);


memox - Di 31.03.09 17:42
Super! Vielen Dank!
An die Position des Zeigers habe ich gar nicht gedacht.


Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!