Bueno pues me respondo yo mismo, por si alguien lo necesita en el futuro.
Cita:
|
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.