5,388
社区成员
发帖
与我相关
我的任务
分享★★★★★dbgrid的问题？★★★★★
我有个dbgrid，上面已经列出了一些字段，我想实现我点机一个字段“企业代码”是标题，一条内容为“111112222”我可以以这“111112222”产生一个事件来实现一些功能。说简单点就是我如何取得这个值并把它传到一个变量里面去
...全文
请发表友善的回复…
发表回复
lumina 2003-08-19
- 打赏
- 举报
同意dulei115.
yhncom_36 2003-08-19
- 打赏
- 举报
同意： DWGZ()
yhncom_36 2003-08-19
- 打赏
- 举报
同意： DWGZ()
dulei115 2003-08-19
- 打赏
- 举报
用一个TDBEdit连接到DBGrid的那个DataSouce上，DataField设为‘企业代码’，不就可以了吗？
xxsteven 2003-08-19
- 打赏
- 举报
没有人说话了吗？
xxsteven 2003-08-19
- 打赏
- 举报
请大家讲讲该如何做呢/？？？？？？？
xxsteven 2003-08-19
- 打赏
- 举报
谢谢大家，不过现在的问题还是比较麻烦
请看： 企业代码 企业名称 企业信息
111 aaaa bbbb
222 cccc dddd
333 eeeee ffff
上面的数据相当于是dbgrid显示的东西，我现在想实现的是点激一行内的任何一个cell，都给s付值成那一行记录企业代码的内容。比如我 点激 aaaa ，显示111，点激 bbbb还是显示111点激 111还是显示111，点激 cccc显示222 dddd显示222。这如何实现呢？
请看： 企业代码 企业名称 企业信息
111 aaaa bbbb
222 cccc dddd
333 eeeee ffff
上面的数据相当于是dbgrid显示的东西，我现在想实现的是点激一行内的任何一个cell，都给s付值成那一行记录企业代码的内容。比如我 点激 aaaa ，显示111，点激 bbbb还是显示111点激 111还是显示111，点激 cccc显示222 dddd显示222。这如何实现呢？
IORILI 2003-08-18
- 打赏
- 举报
procedure TForm1.DBGrid1DblClick(Sender: TObject);
var s:string;
begin
s:=table.fieldbyname('企业代码').AsString;
end;
var s:string;
begin
s:=table.fieldbyname('企业代码').AsString;
end;
Atlanta 2003-08-18
- 打赏
- 举报
DWGZ() 是正确的
lw549 2003-08-18
- 打赏
- 举报
楼上的又快我一步
DWGZ 2003-08-18
- 打赏
- 举报
procedure TForm1.DBGrid1TitleClick(Column: TColumn);
begin
s := Column.Field.AsString;
end;
begin
s := Column.Field.AsString;
end;
