Probleme mit TmemoryStream

[SIn]

Ich habe zwei Fragen zu diesem Thema.

Delphi-Quellcode:

procedure TPrivatMessForm1.Button1Click(Sender: TObject);
 begin
   sendstream:=TMemorystream.create;
   textfeld.Lines.SaveToStream(sendstream);
   sendstream.Position:=0;
   memo1.lines.LoadFromStream(sendstream);

Das is das gleiche Beispiel aus der Delphi-Hilfe, nur mit anderen Komponenten.
Nur steht in meinem Memo, wenn ich hallo im richedit eingebe,

{\rtf1\ansi\ansicpg1252\deff0\deflang1031{\fonttbl {\f0\fnil\fcharset0 MS Sans Serif;}{\f1\fnil MS Sans Serif;}}
\viewkind4\uc1\pard\f0\fs16 hallo\f1
\par }

drin.

Kann mir jemand sagen , wie ich dieses Problem lösen kann.

Meine 2 Frage:

Wie kann ich in einem Stream einen String reinschreiben und anschließenden wieder auslesen.
Soviel ich weiss geht das nur über einen Buffer. Weiter bin ich aber auch noch nicht gekommen.
Thx im Voraus für Hilfe.

Mfg SIn

[CalganX]

Hi,
das Problem ist, dass in einem RichEdit sog. Rich-Text drinsteht. Dieser speichert die Formartierungen (wie bspw. fett, kursiv etc.). Dies wird so gespeichert, wie es dort steht. Deswegen steht auch in deinem Stream auch der ganze RTF.

Aber eine Frage: warum machst du das über Streams? :gruebel:

Delphi-Quellcode:

memo1.Text := textfield.Plaintext;

So hast du es nicht nur einfacher, sondern hast btw auch die ganzen RichText-Formartierungen raus.

Chris

[SIn]

Ich möchte lernen mit Streams umzugehen. aber was ich wirklich brauche ist, wie ich einen String in einen Stream einlese und in an einem anderen rechner wieder auslesen kann.

[MrKnogge]

Dann darfst du eben nur den eigentlichen Text abspeichern, bzw. nimmst zum lesen ebenfalls ein Memo :wink:

Was den allgemeinen Umgang mit Streams angeht, so gibt es auf Delphi-Source ein wunderbares Tutorial.

[SIn]

Merci für den Tipp. Das ich 2 Memos nehmen könnte habe ich mir auch schon gedacht. Es hätte mich nur intersiert ob , es auch mit 2 verschiedenen Komponenten geht. was solls , solange es klappt.g.

thx mfg SIn