用鼠标点击方格,显示对号(对应值是ture),再点击一下方格对号消失(对应值是false),请各位指教!
解决方案 »
- Delphi6里面的array[0...1024]of byte类型怎么理解?
- c/s请教
- Error] tkzb01.pas(124): Statement expected but 'PROCEDURE' found 是什么意思??在线??
- 想做像WIN开始那样的菜单,怎么做还是用什么控件?
- 怎样当鼠标在RichEdit上移动时检测鼠标下的文字?
- 怎么又错了
- 关于相同记录不能存在的问题
- 大家来聊聊,Delphi程序员的前途--去找工作,别人一看,学delphi得,做MIS的,不宵一顾
- 请问高手,如何判断一个数据库是不是在编辑装态?
- 寻找心目中一个理想的软件!
- 用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;—————————————————————————————————
宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。
—————————————————————————————————
—————————————————————————————————
宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。
—————————————————————————————————