如何在FireMonkey TStringgrid中取消选择单元格

Question

有人知道如何在FireMonkey TStringgrid中取消选择单元格吗（换句话说，我需要知道哪个单元格被选中以及如何取消选择）…？

我们使用的是Delphi Berlin 10.1

提前感谢。

- Dejan

---

Selected 属性提供了选定行的索引。ColumnIndex 属性提供了选定列的索引。我找不到除选择另一个单元格之外取消选择的方法。请参见 Delphi XE4 stringgrid selectcell in FireMonkey。 - LU RD

Answer 1

要获取当前选定的行，请使用Selected属性。要获取当前选定的列，请使用ColumnIndex属性。行和列索引从0开始，

要取消选定，可以选择将Selected和ColumnIndex设置为例如-1。

使用以下代码进行测试：

procedure TForm29.Button1Click(Sender: TObject);
var
  SelRow, SelCol: integer;
begin
  SelRow := StringGrid1.Selected;
  SelCol := StringGrid1.ColumnIndex;
  Memo1.Lines.Add(Format('SelRow: %d, SelCol: %d',[SelRow, SelCol]));
  StringGrid1.Selected := -1;
  StringGrid1.ColumnIndex := -1;
  SelRow := StringGrid1.Selected;
  SelCol := StringGrid1.ColumnIndex;
  Memo1.Lines.Add(Format('SelRow: %d, SelCol: %d',[SelRow, SelCol]));
end;

- Tom Brunberg