FoxPro/Visual FoxPro - PROBLEMA CON GRID

HOLA POR FIN TERMINE MI PROYECTO PERO ME PASA UNA COSA MUY PARTICULAR, TENGO UN GRID QUE LO LLENO CON UN CURSOR CON BASE A UNA INSTRUCCION SQL LE DIGO QUE LLENE EL GRID DONDE CONSECUTIVO=UN TEXT BOX EN EL LOST FOCUS LE PONGO ESTE CODIGO DE ABAJO EL ME LO CARGA EL GRID LA PRIMERA VEZ PERFECTAMENTE PERO CUANDO SE HACE UNA SEGUNDA O MAS
CONSULTA LAS COLUMNAS DEL GRID SE ENCOJEN Y NO QUEDA EN EL TAMAÑO ORIGINAL

¿¿¿¿¿QUE PUEDE SER??? ALGUNA PROPIEDAD DEL GRID

SELECT MOVIMIENTO.* ,ITEMS.DESCRIPCIO,COSTOS.DESCRIPCIO AS DESCOS FROM MOVIMIENTO LEFT JOIN COSTOS ON COSTOS.ID=MOVIMIENTO.ID LEFT JOIN ITEMS ON ITEMS.ITEM=MOVIMIENTO.ITEM WHERE CONSE= maximoconse INTO CURSOR busqueda
CREATE CURSOR Captura1 (conse n (12),tipo c(5),DESCOS C(20) NULL,item c (30) NULL, cantidad n(5), valor n(12), costo n(15))
SELECT busqueda
SCAN
INSERT INTO Captura1 (conse,tipo,DESCOS,item, cantidad, valor, costo) VALUES (BUSQUEDA.conse,BUSQUEDA.tipo,(busqueda.id+ BUSQUEDA.DESCOS),busqueda.item+ BUSQUEDA.DESCRIPCIO, ;
BUSQUEDA.cant, BUSQUEDA.valorit, BUSQUEDA.costoit)
ENDSCAN
SELECT captura1

TERMINE MI PROYECTO EHHHHHHHHH, JEJE
ERA SI PONER ESTO AL PRINCIPIO
ThisForm.grid1.RecordSource=""