使用DataSource.DataSet.RecNo可以得到dbgrid選中的是第幾行，示例代碼如下：

procedure TForm1.btn1Click(Sender: TObject);
begin
  ShowMessage(IntToStr(dbgrd1.DataSource.DataSet.RecNo));
end;

效果如下：

先用ADOQuery連接數據庫在DBgrid內顯示出來~~~~之後在DBgrid的OnCellClick事件寫如下代碼
procedure TForm1.DBGrid1CellClick(Column: TColumn);
begin
self.Edit1.Text:= inttostr(Column.ID); //列號

procedure TForm1.DBGrid1CellClick(Column: TColumn);
begin
    Edit2.Text := IntToStr(Column.ID);
    Edit3.Text := IntToStr(Self.Query1.RecNo);
    Edit4.Text := Column.FieldName;
end;

DELPHI dbgrid 選中的是第幾行 怎麽判斷?