>>WITH This.MyGrid1 >> .GridLines = 3 >> .RecordSource = "TmpMatList" >> .columncount = 3 >> x=1 >>. >>. >>. >> x=2 >>. >>. >>. >> x=3 >> .Columns(x).ControlSource = "TmpMatList.Picked" >> .Columns(x).ReadOnly = .F. >> .Columns(x).Header1.caption = "Order" >> .Columns(x).Header1.FontBold= .T. >> .Columns(x).Width = 40 >> .Columns(x).RemoveObject("Text1") >> .Columns(x).NewObject("Check1", "CheckBox") >> .Columns(x).Check1.caption = "" >> .Columns(x).Check1.Visible = .T. >> .Columns(x).Check1.Enabled = .T. >> .Columns(x).Check1.ReadOnly = .F. >> .Columns(x).Sparse = .F. >>ENDWITH >>>
<img src="http://www.joepirola.com/checkboxproblem.jpg">