DELPHI dbgrid 选中的是第几行 怎么判断?
先用ADOQuery连接数据库在DBgrid内显示出来~~~~之后在DBgrid的OnCellClick事件写如下代码
procedure TForm1.DBGrid1CellClick(Column: TColumn);
begin
self.Edit1.Text:= inttostr(Column.ID); //列号
self.Edit2.Text:= inttostr(self.ADOQuery1.RecNo); //行号
end;
使用DataSource.DataSet.RecNo可以得到dbgrid选中的是第几行,示例代码如下:
procedure TForm1.btn1Click(Sender: TObject); begin ShowMessage(IntToStr(dbgrd1.DataSource.DataSet.RecNo)); end;
效果如下:
好的代码像粥一样,都是用时间熬出来的