有什么需要特别设置的地方吗?
procedure TForm1.DBGrid1CellClick(Column: TColumn);
begin
if column.FieldName='check' then
with datamodule2.ClientDataSet1 do
begin
Edit;
FieldByName('check').AsBoolean:=true;
Post;
ApplyUpdates(0);
end;
procedure TForm1.DBGrid1CellClick(Column: TColumn);
begin
if column.FieldName='check' then
with datamodule2.ClientDataSet1 do
begin
Edit;
FieldByName('check').AsBoolean:=true;
Post;
ApplyUpdates(0);
end;
解决方案 »
- 关于得到当前窗口和控件的问题
- 集合的元素如合访问?如合测定集合内的元素个数?
- Delphi 2004-11专家榜
- Exception EstringlistError in module Datatran.dll at 0001346D
- ADO的 数据库连接字符串如何写
- clientsocket连一个cs的端口27015连不上为什么呢?
- 就这点分,在Access中怎么判断表存不存在啊
- delphi中的CAD二次开发
- 哪儿有实现 Hashtable 的源程序?
- 很着急的问题,解决马上送分!!!
- 在delphi中怎樣對sql server 表的圖片字段賦值
- 我能把自己写的应用程序内嵌到word里去吗?如果能应该如何实现???在线等待!
不对就是你没有用一个服务器的连接去修改!
用服务器的连接改!
procedure TForm1.DBGrid1CellClick(Column: TColumn);
begin
if column.FieldName='check' then
with datamodule2.ClientDataSet1 do
begin
Edit;
FieldByName('check').AsBoolean:=true;
ApplyUpdates(0);//ApplyUpdates(-1);都可以
end;