用鼠标点击方格,显示对号(对应值是ture),再点击一下方格对号消失(对应值是false),请各位指教!
解决方案 »
- Delphi7控件下找不到RZPageControl?
- 如何查看delphi内部代码
- cxgrid 这两 个控件 能否 实现 鼠标 经过 每一条数据行 时 改变 整行 的 底颜色 ?????
- delphi问题,急!
- 小弟有一事不明,请大哥指教。
- 请大家谈一谈SOCKET的用法
- query的用法问题!
- 串口通信与画图结何的例子!!!!!!!!!!!!!!!!!!
- 如何锁定桌面,等待密码输入解锁?
- TXMLDocument在动态库里调用出错,,,,,救命啊,,,,
- 用SocketClient连上了SocketServer端,如何从Server端放回传数据?
- 如何通过ODBC访问Excel,读存Excel表?还请不吝赐教!!!
procedure TForm1.DBGrid1CellClick(Column: TColumn);
begin
with Column.Field do if FieldName = '字段名' then
begin
if DataSet.State in [dsInsert, dsEdit] then
AsBoolean := not AsBoolean;
end;
end;—————————————————————————————————
宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。
—————————————————————————————————
—————————————————————————————————
宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。
—————————————————————————————————