Grid中第一列是选择，改成了check控件，没有绑定数据，如何实现点击某行时，就在该行前面的check打勾？ - VFP论坛

编程论坛 → 数据库技术 → 『 VFP论坛』 → Grid中第一列是选择，改成了check控件，没有绑定数据，如何实现点击某行时，就在该行前面的check打勾？

标题：Grid中第一列是选择，改成了check控件，没有绑定数据，如何实现点击某行时， ...

只看楼主

yafengliang

等　级：论坛游民
帖　子：111
专家分：35
注　册：2016-2-21
结帖率：54.55%

楼主

问题点数：0 回复次数：5

Grid中第一列是选择，改成了check控件，没有绑定数据，如何实现点击某行时，就在该行前面的check打勾？

如题

搜索更多相关主题的帖子: check　绑定　数据　点击　某行　

2018-04-29 10:46

吹水佬

等　级：版主
威　望：432
帖　子：10064
专家分：41463
注　册：2014-5-20

第 2 楼

得分:0

最好看看GRID的具体用法。

2018-04-29 11:45

snowofdream

等　级：论坛游民
威　望：1
帖　子：14
专家分：30
注　册：2018-4-10

第 3 楼

得分:0

我这个是绑定了的

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

2018-04-29 14:38

mywisdom88

等　级：版主
威　望：190
帖　子：3125
专家分：8340
注　册：2015-3-25

第 4 楼

得分:0

* 比如你的表是： 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-04-29 21:48

schtg