La Web del Programador: Comunidad de Programadores
 
https://www.lawebdelprogramador.com/preguntas/

    Pregunta:  1038 - ERROR CAMPOS MEMO CON CDX
Autor:  Antonio Cardinaux
trabajo con CLIPPER 5.3. Y he tenido el siguiente error:

DBFCDX 2006 - se detectó corrupción
Corruption detected in memo-file In function: Flex GetMemoData:OnLine:1200

La única solución que pude hallar fue borrar el registro que tenía el error.
El equipo sobre el que trabajo es una terminal PENTIUM II de 300 Mhz montada sobre un servidor NT 4.00 y SERVICE PACK 4. Si conocen otra favor de informarme. Gracias.

  Respuesta:  Vicente Serrano
YO creo, que tenias corrupto ese registro,
y la unica solucion fue..lo que hiciste.
Borrar el registro Malo.
?Ha ocurrido mas veces.
  Respuesta:  Jorge Medina
Hola.
Te envio tú respuesta en una función, puedes incorporar a tu programa.

El programa debe compilarse, usando la Libreria LLIBG, de CLipper 5.3

Clipper myprogram.prg
Exospace fi myprogram Lib LLIBG

Ejemplo (logo.bmp, archivo que puede crearse en Paint brush o en otros programas)

function showbmp()
Local Logo:=gbmpLoad(´Logo.bmp´)
Set videomode to 18 //Vga 640*480
gbmpLoad(logo,20,30) //posición de la pantalla
inkey(0)
Set Videomode to 3 //pantalla texto
Return nil