Esto es algo que utilizo que puedes modificar a tu gusto...
Recibe un campo blob, donde hay notas en formato RTF.
Las mete dentro de un TRichEdit.
Devuelve la propiedad Text del TRichEdit, que no tiene formato.
Nota: TRichEdit es parte de Delphi.
Código Delphi
[-]
function TFMain.DameTexto(Campo: TBlobField): string;
var
MS : TMemoryStream;
RichEdit : TRichEdit;
begin
RichEdit := TRichEdit.Create(Self);
MS := TMemoryStream.Create;
try
RichEdit.Parent := Self;
RichEdit.Visible := False;
Campo.SaveToStream(MS);
MS.Position := 0;
RichEdit.Lines.LoadFromStream(MS);
Result := RichEdit.Lines.Text;
finally
MS.Free;
RichEdit.Free;
end;
end;