Richedittext nach Richedit ?

[Brüggendiek]

Hallo Vader!

Wenn Du einen RichEdit-Text in ein anderes RichEdit einfügen willst, gehe doch über TStringStream!

Delphi-Quellcode:

var
  stream: TStringStream;

begin
  stream := TStringStream.Create ('');
  try
    reQuelle.Lines.SaveToStream (stream);
    reZiel.SelText := stream.DataString;
  finally
    stream.Free;
  end;
end;

und der Inhalt des reQuelle ist an der aktuellen Position in reZiel. Vorher natürlich SelStart auf die Einfügeposition und SelLength auf 0 setzen - oder den passenden Wert, wenn der eingefügte Text etwas ersetzen soll.

Befindet sich der einzufügende Text in einer Datei, muß diese in einen FileStream eingelesen und in den StringStream kopiert werden.

(der Source ist direkt ins Forum getippelt, also keine Haftung für TappsFauler!)

Gruß

Dietmar Brüggendiek