Formatierten Text aus Richedit in DB speichern?

[marabu]

Nur eine von vielen Möglichkeiten:

Delphi-Quellcode:

function RichText(re: TRichEdit): String;
var
  ss: TStringStream;
begin
  ss := TStringStream.Create ('');
  try
    re.Lines.SaveToStream(ss);
    Result := ss.DataString;
  finally
    ss.Free;
  end;
end;

marabu