如何读取DBGRID任意行某列字段内容? 请问:在DBGRID表格中,当Mouse点击任意行列时如何读出当前行某列字段内容?我在OnColEnter事件里写,却只要在不同列切换时才触发,如果在同一列点击却没有反应。 我的想法时不管点击哪列,都能读取这一行指定列的列的显示内容。谢了! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 为什么不在OnCellClick里面做呢? 定义 Tinfo=record colmn:integer;//列的序号 content:String;//当前行列的字段内容 end;声明: info:Tinfo;在CellClick中如下就OK了,以后如果用到点击取得的内容,刚直接用 info.contentprocedure TForm1.DBGrid1CellClick(Column: TColumn);var str_content:string;begin str_content:=dbgrid1.DataSource.dataSet.fieldbyname(column.FieldName).AsString; info.colmn:=column.ID; info.content:=str_content; ShowMessage(str_content); ShowMessage(inttostr(info.colmn));end; 请问如何实现Image打印预览 [天下事]30岁前如何达到年薪10万(转载) 有没有办法 从中文字符串生成拼音字母的字串? 好老师我会另开贴给分 怎样检测JPG文件是否合法? 一个看似简单,其实很有深度的问题!!!!!!!! 求教一句SQL语句,解决马上给分,在线等待 如何屏蔽掉控件中的调试信息? 请各位介绍一些好的书籍和例程 请问如何读目录,扫描目录,把相应目录内容入数据库(access). 紧急求助,请高手帮忙! adoset 的reflesh 如何使用? 如何让Edit显示为空字符?(我是用ACCESS建的库)
Tinfo=record
colmn:integer;//列的序号
content:String;//当前行列的字段内容
end;声明:
info:Tinfo;在CellClick中如下就OK了,以后如果用到点击取得的内容,刚直接用 info.contentprocedure TForm1.DBGrid1CellClick(Column: TColumn);
var
str_content:string;
begin
str_content:=dbgrid1.DataSource.dataSet.fieldbyname(column.FieldName).AsString;
info.colmn:=column.ID;
info.content:=str_content;
ShowMessage(str_content);
ShowMessage(inttostr(info.colmn));
end;