Zitat von
Milhouse2500:
Gibt es noch andere möglichkeiten?
An den RTF-Quelltext kommst Du nur, indem Du die Daten in einem Stream kopierst...
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
StrStream: TStringStream;
begin
StrStream := TStringStream.Create('');
try
RichEdit1.Lines.SaveToStream(StrStream);
StrStream.Seek(0, soFromBeginning);
Memo1.Text := StrStream.DataString;
finally
StrStream.Free();
end;
end;
good will hunting
ps: zurückschreiben dann natürlich per LoadFromStream...