如何实现在dbgrideh中选中checkbox时可以同时更新表中相应的记录?在线等待,

kylejiang 2004-09-24 09:25:02
我使用dbgrideh (3.22版for D7),虽然可以使用dbgrideh的checkbox,但是每次都是在下一次操作执行后数据库表才能显示上一次的结果。我现在想实现下面的功能,请大家不吝指教啊。

双击dbgrideh的某一行,这时checkbox为选中状态(为true),并且表中的相应boolean字段更新为true .

procedure TForm1.DBGridEh1DblClick(Sender: TObject);
begin
if(ADOTable1.FieldByName('lockstate').AsBoolean=true) then
begin
showmessage('lock');
exit ;
end
else
begin
with ADOTable1 do
begin
ADOTable1.open ;
ADOTable1.Edit ;
ADOTable1.FieldByName('lockstate').AsBoolean:=true ;
ADOTable1.Post ;
end;

end;
...全文
129 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
纯冰糖 2004-09-24
  • 打赏
  • 举报
回复
up,没用过那个控件,是不是bug啊?
kylejiang 2004-09-24
  • 打赏
  • 举报
回复
这样也不行的啊
jian23cn 2004-09-24
  • 打赏
  • 举报
回复
数据操作完后直接刷新数据吧:
ADOTable1.Refresh;

5,391

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧