• 全部
  • 语言基础/算法/系统设计
  • 数据库相关
  • 图形处理/多媒体
  • 网络通信/分布式开发
  • VCL组件开发及应用
  • Windows SDK/API
  • 问答

如何獲取dbgrid當前輸入焦點單元格的座標

Magusflp008 2005-05-24 11:44:59
如題
...全文
95 点赞 收藏 4
写回复
4 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
Magusflp008 2005-05-25
Kshape([伟大的大伟!]) : 我想实现的是当输入焦点在某个单元格上时,用一个别的控件覆盖在该单元格上。所以要知道单元格的坐标

naner_china(naner): 如果不是鼠标移动,是通过tab将焦点转到那个单元格上时呢?
回复
naner_china 2005-05-25
procedure TForm1.DBGrid1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
var
g_x,g_y:integer;
begin
g_x := x;
g_y := y;
edit1.Text := inttostr(g_x);
edit2.Text := inttostr(g_y);
end;
回复
Kshape 2005-05-25
如果是鼠标点单元格可以这样
procedure TForm1.DBGrid1CellClick(Column: TColumn);
begin
showmessage(IntToStr(DBGrid1.SelectedIndex));
showmessage(inttostr(Table1.RecNo))//行号也就相当于记录号

end;

如果是选中一行
那么这样就可以了:
当前行号:DBGrid1.DataSource.DataSet.RecNo

当前列:DBGrid1.SelectedIndex
回复
Magusflp008 2005-05-25
怎麼沒有人阿
回复
发帖
Delphi
创建于2007-08-02

4871

社区成员

Delphi 开发及应用
申请成为版主
帖子事件
创建了帖子
2005-05-24 11:44
社区公告
暂无公告