FoxPro/Visual FoxPro - PROBLEMAS con BOTONES!

Tengo un GRID que es llenado por medio de una consulta
SQL. Esta consulta tiene 6 columnas y en la 7º le quiero
agregar un Command_Button.

Por medio del Diseñador cree un grupo de Clases llamado
'miclase' donde tengo una clase creada llamada 'Eliminar_Pago'
y esta contiene un Command_Button llamado 'Eliminar'

Cuando actualizo el GRID me aparece este mensaje y luego aborta
en el AddObject : 'YA EXISTE UN OBJETO MIEMBRO CON ESTE NOMBRE'

Lo que hago es esto :

SET CLASSLIB miclase ADDITIVE

cad31 = 'select ..... into cursor tmp2'
ThisForm.Container3.GRID.columncount = 7
ThisForm.Container3.GRID.recordsource = cad31
ThisForm.Container3.GRID.recordsourcetype = 4

ThisForm.Container3.GRID.Column1.Text1.value = TMP2.NRO
ThisForm.Container3.GRID.Column2.Text1.value = TMP2.CODIGO
ThisForm.Container3.GRID.Column3.Text1.value = TMP2.FECHA
ThisForm.Container3.GRID.Column4.Text1.value = TMP2.MES
ThisForm.Container3.GRID.Column5.Text1.value = TMP2.ANO
ThisForm.Container3.GRID.Column6.Text1.value = TMP2.IMPORTE

ThisForm.Container3.GRID.Column7.AddObject('Eliminar','Eliminar_Pago')
ThisForm.Container3.GRID.Column7.Sparse=.f.

ALGUIEN SABE QUE ESTOY HACIENDO MAL ?

Tambien probe poner directamente un boton en la columna 7 del GRID
y reemplazar el AddObject por esta linea :

ThisForm.Container3.GRID.Column7.Currentcontrol= 'Eliminar'
ThisForm.Container3.GRID.Column7.Sparse=.f.

y la primera vez que entro lo muestra y funciona bien, pero luego de
apretar el boton al actualizar me dice que no encuentra la columna 7
o sea reconoce solamente los da

Hola...
Proba removiendo primero el textbox que trae el grid por defecto y despues agregale el commandbutton
Suerte... espero que funcione

gracias por el dato , pero tampoco funciona...

otra sugerencia?

No necesitas hacer una clase para esto, porque en tiempo de diseño puedes agregar un botón a una columna del grid, y preparar todos sus miniprogramas en tiempo de diseño, en el cual, manejar los errores se hace más fácil. Prueba lo siguiente

Selecciona el grid, haz clic derecho en él y pulsa modificar
Luego selecciona de la barra de herramientas controles de formularios y agrega un botón a la columna que desees en el grid, luego vé a esa columna del grid, busca la propiedad currentcontrol, el cual tendrá text1 por defecto, allí seleccionas command1, programas command1 y listo.

Espero que te sirva.

Osmin