如何获取DBGRID选中单元格的坐标

[w000111]

如何获取DBGRID选中单元格的坐标，
目的为了用快捷键在下面弹出修改窗口！

[w000111]

自己顶

[bdmh]

dbgrid1.MouseCoord

[ALAN_XQ]

将 DBGrid 的ShowHint 设置为true；
在DBGrid的 OnMouseMove事件中写上

procedure TForm1.dbgrd1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
var
  Coord : TGridCoord;
begin
  Coord := dbgrd1.MouseCoord(X,Y);  //获取当前指针坐标对应的Grid行列坐标
  if Coord.Y < 1 then Exit;

  dbgrd1.DataSource.DataSet.RecNo := Coord.Y;
  dbgrd1.Hint := dbgrd1.DataSource.DataSet.FieldByName('你要显示数据的列名').AsString;
end;

[kye_jufei]

var
  cowrxy:TGridCoord;
begin
  cowrxy:=dbgrd1.MouseCoord(X,Y);

[w000111]

楼上的回答都是和鼠标有关，我要求的是和鼠标无关的，选中的单元格是键盘上下键选中的

[prometheusphinx]

TDrawGrid(DBGrid1).Col
TDrawGrid(DBGrid1).Row

[huangheguyun]

TDrawGrid(DBGrid1).Col
TDrawGrid(DBGrid1).Row

[last_wolf1860]

1.窗体的Private 中字义：ColIndex:Integer;//得到当前选中的列标
2.DbGrid的OnColEnter事件中添加
begin
ColIndex:=dbgrid.SelectedIndex;
end;
3.在窗体上添加一个Action,定义好快捷键,OnExecute中写
begin
Case ColIndex of
0:begin
//编辑窗
end;
1:Begin
//对应编辑窗
end;
end;