回复 20楼 茵梦湖
感谢 茵梦湖 终于解决了添加控件的方法。thisform.grid1.Columns(3) .AddObject("是否","checkBox")
thisform.grid1.Columns(3) .是否.Visible =.t.
thisform.grid1.Columns(3) .是否.caption =""
thisform.grid1.Columns(3) .CurrentControl ="是否"
thisform.grid1.Columns(3) .Sparse =.f.
thisform.grid1.Columns(3) .width =30