delphi - 如何取消选择 FireMonkey TStringgrid 中的单元格

Question

有谁知道如何取消选择 FireMonkey TStringgrid 中的单元格(换句话说，我需要知道选择了哪个单元格以及如何取消选择)...？

我们正在使用 Delphi Berlin 10.1

提前致谢。

Answer 1

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

要取消选择，您可以选择将 Selected 和 ColumnIndex 设置为 f。前任。 -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;