RichEdit kopieren

Coder · Beiträge: 1383 Erhaltene Danke: 1 WinXP D2005 PE

Hi
Ich will den Text eines RichEdits in ein anderes RichEdit kopieren und vor jede Zeile ein > setzen.

Delphi-Quelltext

1:	for Item := 0 to Editor1.Lines.Count - 1 do RichEdit2.Lines.Add('>' + Editor1.Lines[Item]);

Damit wird zwar der Text kopiert aber nicht die Textatribute.

Wie kann ich den Text sammt Atribute kopieren?

Keldorn · Verfasst: So 09.01.05 20:29

2 Möglichkeiten:
über die Zwischenablage (find ich aber nicht so gut)
einen Memorystream erstellen und mit richedit.lines.savetostream und loadfromstream das richedit kopieren. vorm laden drauf achten, das du die position im stream wieder auf 0 setzt

Mfg Frank

_________________
Lükes Grundlage der Programmierung: Es wird nicht funktionieren.
(Murphy)

Coder · Beiträge: 1383 Erhaltene Danke: 1 WinXP D2005 PE

Thx, hab mich für den Stream entschieden.

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:

var  Stream1: TMemoryStream;

  Stream1 := TMemoryStream.Create;
  RichEdit1.Lines.SaveToStream(Stream1);
  Stream1.Position := 0;
  RichEdit2.Lines.LoadFromStream(Stream1);
  Stream1.Free;

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme