CREATE CURSOR temp (l1 l) APPEND BLANK lo = CREATEOBJECT('Form') lo.ADDOBJECT('grid1','grid') lo.Grid1.COLUMNCOUNT = 1 WITH lo.Grid1.COLUMNS(1) .ADDOBJECT('check1','checkbox') .CURRENTCONTROL = 'Check1' ENDWITH lo.Grid1.VISIBLE = .T. lo.SHOW()