Copiar al portapapeles

[yusnerqui]

También pudieras probar algo como esto aunque en este caso no doy fe de que funcione:

Código Delphi [-]
var
 Tex : TStringStream;
begin
 Tex:= TStringStream.Create(TuTabla.fieldByName('CampoMemo').AsString);
 try
   RichEdit1.Lines.LoadFromStream(Tex);
 finally
   Tex.free;
 end
end;

En fin son varis las pruebas que puedes hacer hasta tanto no aparezca una idea mejor.

Saludos