One of my clients is facing this error in a PC with Win98, I tried re-installing the richtext control, it works in other PCs.


lcFileName = "salida.RTF"
PUBLIC archivo_salida
Thisform.edtMemo_rtf.OleRtf.Object.SaveFile(lcFileName)

archivo_salida = "&mrutap\salida.rtf"

CREATE CURSOR ortiz(campo g)

APPEND blank

APPEND GENERAL ortiz.campo FROM &archivo_salida

GO top
*thisform.Funciones1.ocultar_ventanas()
REPORT FORM medr0101_ortiz_fuera.frx TO PRINTER NOCONSOL