★★★★★dbgrid的问题?★★★★★ 我有个dbgrid,上面已经列出了一些字段,我想实现我点机一个字段“企业代码”是标题,一条内容为“111112222”我可以以这“111112222”产生一个事件来实现一些功能。说简单点就是我如何取得这个值并把它传到一个变量里面去 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TForm1.DBGrid1TitleClick(Column: TColumn);begin s := Column.Field.AsString;end; procedure TForm1.DBGrid1DblClick(Sender: TObject);var s:string;begins:=table.fieldbyname('企业代码').AsString;end; 谢谢大家,不过现在的问题还是比较麻烦请看: 企业代码 企业名称 企业信息 111 aaaa bbbb 222 cccc dddd 333 eeeee ffff上面的数据相当于是dbgrid显示的东西,我现在想实现的是点激一行内的任何一个cell,都给s付值成那一行记录企业代码的内容。比如我 点激 aaaa ,显示111,点激 bbbb还是显示111点激 111还是显示111,点激 cccc显示222 dddd显示222。这如何实现呢? 用一个TDBEdit连接到DBGrid的那个DataSouce上,DataField设为‘企业代码’,不就可以了吗? 如何实现enter(回车键)跟tab键的效果一样,在回车时自动使Taborder比自己大的物件获得焦点 小弟想把DBGRID中的数据保存成文件,再导入 procedure和function的用法。 如何用Indy组件访问GMAIL? 问个关于EOF的问题 3个星期的辛苦,换来五个角,到头来还是菜鸟 高手请进,重分相酬 统计数组长度的函数是??? 77分征收四个Delphi中buttons的bmp图标--顶张、下张、上张、末张! 请问怎样在我的程序中实现让用户对按钮的拖拽动作 请sy_315(夏雨)来接分 。 请问如何获得打印机状态?比如是否联机
begin
s := Column.Field.AsString;
end;
var s:string;
begin
s:=table.fieldbyname('企业代码').AsString;
end;
请看: 企业代码 企业名称 企业信息
111 aaaa bbbb
222 cccc dddd
333 eeeee ffff上面的数据相当于是dbgrid显示的东西,我现在想实现的是点激一行内的任何一个cell,都给s付值成那一行记录企业代码的内容。比如我 点激 aaaa ,显示111,点激 bbbb还是显示111点激 111还是显示111,点激 cccc显示222 dddd显示222。这如何实现呢?