Einzelnen Beitrag anzeigen

NicoDE
(Gast)

n/a Beiträge
 
#5

Re: RTF-Text mit Steuerzeichen in DB speichern

  Alt 2. Jun 2004, 22:40
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...
  Mit Zitat antworten Zitat