FoxPro/Visual FoxPro - error en clases

Hola foro
Tengo experiencia en fox pro 2.6 para dos. y ahora estoy investigando visual fox. He bajado algunos manuales y trato de entender lo de clases
pero no puedo hacer correr un programa que en teoría funciona.
Podrían ayudarme???

*** begin
CLOSE DATABASES
OPEN DATABASE (SYS(2004) + "samples\data\testdata.dbc")
USE products
frmtest=CREATEOBJECT("gridform")
frmtest.show
READ events

DEFINE CLASS gridform as Form
width=330
height=250
caption="Ejemplo de cuadrícula"
ADD OBJECT grid1 as grdproducts
PROCEDURE destroy
CLEAR EVENTS
ENDPROC
ENDDEFINE


DEFINE CLASS grdproducts as Grid
left=24
top=10
width=295
height=210
visible=.t.
rowheight=28
columncount=2
column1.controlsource="nombre"
column2.controlsource="otr"
column2.sparse=.F.
PROCEDURE init
this.column1.width=175
this.column2.width=68
this.column1.header1.caption="nombre prod"
this.column2.header1.caption="suspendido "

**** acá da un error: chk1: value, no coinciden los tipos de datos

this.column2.AddObject("chk1","checkbox")
this.column2.currentcontrol="chk1"
this.column2.chk1.visible=.T.
this.column2.chk1.caption=" "
ENDPROC
ENDDEFINE


PODRIAN ENVIARME ALGUNOS EJEMPLOS DE CLASE???
O REFERENCIA PARA PRACTICAR ????
CONSEGUIR MANUALES???

GRACIAS

PABLO ANTUNES