Ver Mensaje Individual
  #8  
Antiguo 11-07-2012
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 19.439
Reputación: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Cita:
Empezado por tiammat Ver Mensaje
Ciertamente, fue lo primero que revisé que hiciera correctamente..., lo copié al editor de textos de Windows y se conservan perfectamente los códigos RTF.

El problema es que cuando deseo leerlo directamente del campo (previa desencriptación) no lo muestra como RTF, sino como un texto sin formato, y los códigos "puros", sin ejecutarse...
Si lo tienes en una cadena (una vez que ya lo has desencriptado) una forma fácil es usando Streams.

Código Delphi [-]
var
  ss: TStringStream;
  StrRichEdit:string
begin

  // desencriptarlo y guardarlo en StrRichEdit
  ...

  // Pasarlo al richedit
  ss := TStringStream.Create(StrRichEdit);
  Richedit1.PlainText := False;
  // Cargarlo
  RichEdit1.Lines.LoadFromStream(ss);
  // liberar el stream (utiliza try..finally)
  ss.Free;
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita