DBGrid通过代码突出显示所定位的行吗？

Posted 2021-04-28

我得到了：ADOTable1（代码人为整数，姓名人为字符串）DataSource1（DateSet为ADOTable1）DBGrid1（已连接到DataSource1，Options-dgRowSelect为true）

我使用以下代码在ADOTable1上找到一行

  ADOTable1.Locate(ADOTable11codepeople.FieldName, 1, []);

DBGrid1正在选择正确的行。但没有重点。

如何使DBGrid自动突出显示我从ADOTable1中定位的行？

我阅读了以下链接，但没有找到答案：

How to set active cell in TDBGrid?

Delphi - Using DBGrid to select rows from a search

View position in DBGrid when scrolling in Delphi

请提供简单的源代码...

PS：我使用的是Delphi 2010。

答案

确定，尝试了一下之后，我发现下面的代码可以完成代码：

另一答案

无论如何，感谢您的答复：）

grid.SelectedRows.CurrentRowSelected：= True;这有助于我突出显示当前行