RichEdit da problemas en Windows 98
 

Hola amigos del foro, primero que todo quiero agradecer el que se tomen la molestia de leer este hilo.

Resulta que en este mismo foro aprendí a guardar datos en una base de datos con formato rtf, para este fin uso un richedit, pues el DBRichtEdit no está acorde con la lógica de mi aplicación. A continuación muestro el código que utilizo:

Código Delphi [-]
var 
  Aux: TStringStream;
begin
   Aux := TStringStream.Create('');
   try     
       Requi.Lines.SaveToStream(Aux);
       FTabla.FieldByName('Requisitos').AsString := Aux.DataString;     
   finally
     Aux.Free;
   end;

Donde Requi es mi TRichEdit. Para mostrar el texto posterioemente simplemente escribo:

Código Delphi [-]
 Requi.text :=  FTabla.FieldByName('Requisitos').AsString;

Todo esto funciona en Windows xp, pero si lo corro en Windows 98 me muestra todo el código rtf tal y como está guardado. Como puedo solucionar este problema?

Gracias una ves más.
Saludos Yusnerqui

N.t.s???
 

Hola de nuevo, será que no tiene solución mi problema, A que se deberá este comportamiento?

Saludos y gracias una ves más.

Resuelto
 

Bueno pues me respondo yo mismo, por si alguien lo necesita en el futuro.


Pues nada que la solución está en sustituir ese código por este otro:

Código Delphi [-]
 
 var 
    Aux: TStringStream;
  begin
      Aux := TStringStream.Create(FTabla.FieldByName('Requisitos').AsString);
      try
         Requi.Lines.LoadFromStream(Aux);
      finally
         Aux.Free;
      end;
  end;

un poquito más largo pero funciona tanto en XP como en 98

Saludos.