免费 pascal，tdbgrid，获取当前行

Question

我是免费 pascal 和 lazarus 的新手，我想知道如何从 tbgrid 中的选定行获取行数据（例如 id 列）？

Answer 1

网格链接到数据集。数据集有一个活动行，您可以使用它。

Answer 2

对于未来的寻求者来说，迟到总比不到好。
假设您有一个整数值（如您所述的主列 ID）。
在滚动事件后的 SQLQuery 中，执行如下操作：

procedure TMainform1.SQLQuery1AfterScroll(DataSet: TDataSet);
Var id:Integer;
Begin
    id := DBGrid1.Columns.Items[0].Field.AsInteger; 
end;