如题

最好看看GRID的具体用法。

我这个是绑定了的

[此贴子已经被作者于2018-4-29 14:50编辑过]

* 比如你的表是： TB(用户代号 C,用户名称 C) 等等
select 0 as 选择,用户代号,用户名称 from tb into cursor tmp_tb readwrite

THISFORM.Grid1.RECORDSOURCE = ''
THISFORM.Grid1.COLUMNCOUNT = -1
THISFORM.Grid1.RECORDSOURCE = "tmp_tb"

WITH Thisform.grid1.Columns[1]
    .AddObject('check1','CheckBox')     && 添加复选框
    .CurrentControl = 'Check1'          && 用复选框显示列内容
    .Check1.Visible = .t.               && 使复选框可见
    .Check1.Caption = ''                && 去掉复选框右边的文字 check1
    .Sparse = .f.                       && 所有行均显示复选框
    .Alignment = 2
    .Width = 28                         && 列宽
ENDWITH
* 就可以了，你选择后，就和表绑定了

谢谢！

[此贴子已经被作者于2018-5-1 06:13编辑过]

换行后原来选的那行的勾要去掉。