DBGridEh checkBox问题

wsxcdx 2009-07-07 02:46:08

数据库中有字段A 类型为bit 默认值为0
DBGridEh能生成checkbox列
现在想点击DBGridEh中的checkbox选中记录同时更新数据库中字段A的值为1
选中的才更新
请问这个该怎么实现？

...全文

806 15 打赏收藏转发到动态举报

写回复

用AI写文章

15 条回复

切换为时间正序

请发表友善的回复…

发表回复

wsxcdx 2009-07-09

打赏
举报

问题已解决
感谢bdmh的耐心解答和指导

wsxcdx 2009-07-08

打赏
举报

哪位大侠帮忙看看啊
分不够可以再加...

wsxcdx 2009-07-08

打赏
举报

[Quote=引用 11 楼 hewei001 的回复:]
双击DBGridEh会列出所filename再选中那个为bit类型的列，将checkbox属性设置为true

至于更新到数据库可以
procedure TForm1.DBGridEh1Columns0UpdateData(Sender: TObject;
var Text: String; var Value: Variant; var UseText, Handled: Boolean);
begin
ado.post; //自写事件

end;

还可以在ado bit列的onchange事件中写
[/Quote]
谢谢,属性什么的都设好了
现在就是不知道更新到数据库写事件时如何判断CHECKBOX是否选定
procedure TForm1.DBGridEh1Columns0UpdateData(Sender: TObject;
var Text: String; var Value: Variant; var UseText, Handled: Boolean);
begin

//能不能帮忙写个判断CHECKBOX的事件？

end;

lishan200012 2009-07-08

打赏
举报

需要有一个bit的数据类型的字段.

天鸽 2009-07-08

打赏
举报

双击DBGridEh会列出所filename再选中那个为bit类型的列，将checkbox属性设置为true

至于更新到数据库可以
procedure TForm1.DBGridEh1Columns0UpdateData(Sender: TObject;
var Text: String; var Value: Variant; var UseText, Handled: Boolean);
begin
ado.post; //自写事件

end;

还可以在ado bit列的onchange事件中写

天鸽 2009-07-08

打赏
举报

DBGridEh的checkbox设置为true

wsxcdx 2009-07-08

打赏
举报

怎么就没人呢？

wsxcdx 2009-07-07

打赏
举报

实在不会，谁能给个例子啊？
急用，万分感谢！

wsxcdx 2009-07-07

打赏
举报

post一下是可以更新的
现在就是想在提交之前，点击DBgrideh第一列的CHECKBOX时，即时的更新数据库中字段的值，1为选中，0为没选中
DBGridEh1Columns0UpdateData事件如何判断checkbox是否选中呢？
继续等待

bdmh 2009-07-07

打赏
举报



procedure TForm1.DBGridEh1Columns0UpdateData(Sender: TObject;

  var Text: String; var Value: Variant; var UseText, Handled: Boolean);

这里的value就是新的值,你只要把这个值提交给数据库就行了



其实,没必要,你不写代码,只要点上勾,数据集就自动出于Edit状态,你切换一下记录,或者Post一下就提交到数据库了