Ich hab eine kleines Testprogramm:
Ein RichEdit, ein Memo und 2 Buttons
Mit dem ersten Knopf lässt sich der Text im RichEdit formatieren
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.
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????