FoxPro/Visual FoxPro - Problema con grid

Hola a todos! Alguien me podría ayudar con lo siguiente, como hago para que mi grid el cual de carga desde un cursor no pierda su configuración (nombre de heatherd, cantidad de columnas, etc) cada vez q salgo y vuelvo a entrar al form, Me aparecen todos los campos del cursor y las columnas todas iguales, muchas gracias

bueno yo vuelvo a recargar la configuración que previmante hice en el init del form
mas o menos asi:


y esto lo vuelvo a aplicar en los demas controles
como buscar, guaradr, modificar etc
despues de hacer los procedimientos para buscar, guaradr, modificar etc
copio el codigo del init y me atcualiza lel grid
ahora si hay otra forma mejor me gustaria que me comportan el ejemplo

Gracias x tu ayuda hno!

Alternativa 1; Si la estructura del cursor que se muestra en el control grid no cambia, lo más sencillo es lo siguiente:

*LOAD
* generar un cursor idéntico al que se utiilizará pero sin datos
SELECT Campo1,campo2,campo3 FROM TABLA WHERE .F. INTO CURSOR curDatos

*INIT
* generar la configuración del control grid (siempre conviene que sea un método que se llame desde el INIT),
* tomando como REcordSource = "curDatos"

* En un método del form (para que pueda accederse todas las veces que se necesite
* Generar el cursor con datos (debe tener un nombre distinto de curDatos
* Zap para curDatos
* Append from desde el cursor generado
* Grid.Refresh
SELECT Campo1,campo2,campo3 FROM TABLA WHERE &lcwhere INTO CURSOR curObte
SELECT curDatos
ZAP
Append from DBF("curObte")
USE IN CUROBTE
Thisform.Grid1.Refresh

Alternativa 2. Válida para cualquier situación
Repetir el método de configuración del GRid toda vez que se vuelva a generar el cursor asociado. ( lo dicho por Tony en este hilo)

Recomendación:
Crear una clase basada en Grid que tenga uno o más métodos en los que se resuelvan todos los problemas de configuración del grid.
Luego será solamente el trabajo de valorizar las propiedades creadas (Lista de campos, lista de headers, lista de anchos, lista de formatos y máscaras, tamaño del grid, barras de desplazamiento, etc.)

Gracias x tu ayuda hno!

THISFORM.grdTeste1.RecordSource = ""
SELECT Campo1, Campo2 FROM Cliente INTO CURSOR curTabela
THISFORM.grdTeste1.RecordSource = "curTabela"

Sempre que for atualizar o cursor curTabela primeiro remova do RecordSource a referencia, com isso ele não perde a formatação da Grid.

muy bueno la intervencion de luis alexandre.
probe el codigo y si funciona. simplifica mas las cosas.

Gracias x tu ayuda! Las otras respuestas son muy buenas y me funcionan, pero utilizó ésta xq es menos código y más rápido, saludos!