Ich hab eine kleines Testprogramm:

Ein RichEdit, ein Memo und 2 Buttons

Mit dem ersten Knopf lässt sich der Text im RichEdit formatieren

markieren

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  RichEdit1.SelAttributes.Style := [fsBold];
end;

Mit dem zweiten Knopf wird der Text vom RichEdit ins Memo kopiert.

markieren

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
begin
  Memo1.Text := RichEdit1.text
end;

Aber leider wird nur der eigentliche Text (Im Memo dann ohne Formatierung) kopiert und nicht der RTF-Code.

Wie krieg ich den RTF-Code????

...versuchs mal mit der plaintext option im oi von richedit...

Ob ich PlainText auf true oder false stehen hab, es klappt nicht

Bin mir auch nicht sicher ob das mit

Memo1.Text := RichEdit1.Text funktioniert

Zitat von ibp:

...versuchs mal mit der plaintext option im oi von richedit...

Du musst es glaube ich über einen Stream lösen:

zusammenfalten · markieren

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
var
  myStream : TMemoryStream;
begin
  myStream := TMemoryStream.Create;
  try
    RichEdit1.PlainText := False;
    RichEdit1.Lines.SaveToStream(mystream);
    myStream.Position := 0;
    Memo1.lines.LoadFromStream(mystream);
  finally
    myStream.Free;
  end;
end;

Das geht mit einem Normalen TRichedit nicht nimm doch mal eine TRXRichedit oder TJVRichedit (RXLib oder JVCL) da kann man den StreamTyp einstellen ob Text oder RFT

Es klappt. Danke

welche lösung klappt denn nun ?

Achso..Die mit dem MemoryStream