社区
Delphi
帖子详情
有谁能解决这个问题吗?
dlp826
2003-10-20 04:25:42
在DBGRID中,知道了行号和字段名的情况下怎样去取对应原字段值?
...全文
41
11
打赏
收藏
有谁能解决这个问题吗?
在DBGRID中,知道了行号和字段名的情况下怎样去取对应原字段值?
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
11 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
angle097113
2003-10-21
打赏
举报
回复
你是什么错误怎么不这里就没有事情呢?
把错误提示贴出来
angle097113
2003-10-21
打赏
举报
回复
首先你调试看看获得的行号的正确吗?
dlp826
2003-10-21
打赏
举报
回复
angle097113(深思不解):我试过了,还是不行,下面是我的代码,麻烦您看看,不胜感激:
procedure TForm1.DBGrid1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
var
RowIndex,ColumnIndex:Integer;
begin
RowIndex:=DBGrid1.MouseCoord(X,Y).Y-1;
ColumnIndex:=DBGrid1.MouseCoord(X,Y).X-1;//根据 ColumnIndex 可得知字段名:
if (columnindex>=0) and (rowindex>=0) and (columnindex<=dbgrid1.Columns.Count) then
begin
DBGrid1.DataSource.DataSet.RecNo:=rowindex;
// table1.RecNo:= rowindex;
//table1.DataSource.DataSet.RecNo:=rowindex;
edit1.Text:=dbgrid1.DataSource.DataSet.fieldbyname(dbgrid1.Columns[ColumnIndex].FieldName).AsString;
// edit1.Text :=dbgrid1.Columns[ColumnIndex].FieldName ;
end;
end;
angle097113
2003-10-20
打赏
举报
回复
DBGrid.DataSource.DataSet.RecNo := 行号;
变量 := DBGrid.DataSource.DataSet.FieldByName('字段名称').AsString;
没有问题
guolvguolv
2003-10-20
打赏
举报
回复
如果你不想造成这个表光标的移动,可以再建一个表在第二个表中取数据,不过好象太浪费
dlp826
2003-10-20
打赏
举报
回复
请教aiirii(aiirii) :我不想先定位,造位光标的移动,在某些情况下不友好.有办法吗?
dlp826
2003-10-20
打赏
举报
回复
guolvguolv(guolvguolv) :谢谢你,但table1.fieldbyname('sdfadsf').asstring取得是当前行的数据,我要的是指定行的数据,但我不想进行先选择再取.
aiirii
2003-10-20
打赏
举报
回复
通過行號 定位到該記錄, 直接讀該 dbgrid 連接的 table!!
guolvguolv
2003-10-20
打赏
举报
回复
dbgride是通过DATASOURCE 和TABLE OR QUERRY相连
只要清楚是和什么东西相连就可以取出了
table1.fieldbyname('sdfadsf').asstring
tiger19760407
2003-10-20
打赏
举报
回复
我不清楚你所问的问题,此行号和对应的记录有什么关系,或者说此数据表对什么字段进行了排序?
dlp826
2003-10-20
打赏
举报
回复
错了一个字,应为:在DBGRID中,知道了行号和字段名的情况下怎样去取对应的字段值?
你知道微服务如何拆分,能
解决
哪些
问题
?
你知道微服务如何拆分,能
解决
哪些
问题
?你知道微服务如何拆分,能
解决
哪些
问题
?你知道微服务如何拆分,能
解决
哪些
问题
?你知道微服务如何拆分,能
解决
哪些
问题
?你知道微服务如何拆分,能
解决
哪些
问题
?你知道微服务如何拆分,能
解决
哪些
问题
?你知道微服务如何拆分,能
解决
哪些
问题
?你知道微服务如何拆分,能
解决
哪些
问题
?你知道微服务如何拆分,能
解决
哪些
问题
?你知道微服务如何拆分,能
解决
哪些
问题
?你知道微服务如何拆分,能
解决
哪些
问题
?你知道微服务如何拆分,能
解决
哪些
问题
?你知道微服务如何拆分,能
解决
哪些
问题
?你知道微服务如何拆
【计算机网络】数据链路层究竟
解决
了什么
问题
?
在交换机出现以前,搭建一个小型局域网的方法是通过 集线器 完成的。 集线器(Hub):有多个端口,可以连接多台电脑,但是并没有交换机智能,完全在物理层上工作,它将自己收到的每一个字节都复制到其他端口上去(也就是广播发送),是第一层物理层的联通设备。 然而,通过集线器来连接各个电脑就出现了三个
问题
: 这个包是发送给谁的?谁应该接收? 大家都在发送,会不会产生混乱?怎么避免混乱的情...
ESB为我们
解决
了什么
问题
呢?
什么是ESB,为什么要用这个技术,这个技术
解决
了什么
问题
? ESB,Enterprise Service Bus,即企业服务总线。 这两天在看关于ESB的一些资料,但是看来看去,看得我晕晕乎乎的,不知道这些资料到底在说些什么,因为那些话实在是太官方了,看不懂啊!于是,我就想,我看了这么半天的资料,到底ESB有啥用啊?没弄明白这个
问题
,看多少资料也是徒劳。 以前,
区块链技术到底
解决
了什么
问题
?
对于这个
问题
,目前有很多说法:区块链
解决
了信任
问题
,区块链改变了生产关系,区块链实现了价值交互…… 这些说法都对,但都太宏观了,我们不妨把目光收回来,从一个微观角度来看这个
问题
。去中心化这个词语并不是区块链技术首创的,互联网技术在诞生之初,原本就是一个点到点的去中心化的事物。 后来,为了彼此能够收发邮件,互联网有了POP、SMTP等邮件协议,为了能够显示图文,互联网...
什么是死锁?怎么
解决
死锁
问题
?
什么是死锁,对死锁的具体分析,如何
解决
死锁
Delphi
5,388
社区成员
262,730
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章