RitchEdit da problemas en Windows 98

[yusnerqui]

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

[yusnerqui]

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

Saludos y gracias una ves más.

[yusnerqui]

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

Empezado por yusnerqui

...

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?

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.