如何取消选择 FireMonkey TStringgrid 中的单元格
How to unselect cell in a FireMonkey TStringgrid
有谁知道如何取消选择 FireMonkey TStringgrid 中的单元格(换句话说,我需要知道选择了哪个单元格以及如何取消选择)...?
我们正在使用 Delphi 柏林 10.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;
有谁知道如何取消选择 FireMonkey TStringgrid 中的单元格(换句话说,我需要知道选择了哪个单元格以及如何取消选择)...?
我们正在使用 Delphi 柏林 10.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;