在TAdvStringGrid选择单元格与隐藏的列

我在TAdvStringGrid选择某小区：在TAdvStringGrid选择单元格与隐藏的列

 
const 
    MyCol=4; 
    MyRow=1; 
    HiddenCol=2; 

procedure TForm1.FormCreate(Sender: TObject); 
begin 
    AdvStringGrid1.ColCount:=5; 
    AdvStringGrid1.RowCount:=10; 
end; 

procedure TForm1.BtnHideClick(Sender: TObject); 
begin 
    AdvStringGrid1.HideColumn(2); 
end; 

procedure TForm1.BtnSelectCellClick(Sender: TObject); 
begin 
    AdvStringGrid1.SelectCells(MyCol,MyRow,MyCol,MyRow); 
end; 

不过，我的问题是，经过该栏隐藏，我需要选择不会是细胞选择，因为程序是看到了ColCount现在4，并在第5栏第小区不再存在。不管隐藏的列如何仍然可以选择单元格？

通过选择我的意思是把重点放在细胞，并显示被选择了什么样的细胞，而不是仅仅看它的字符串值的用户。

来源

2013-08-02 Zeina

A

回答

2

按照TAdvStringGuide V6.1开发人员指南57页上，你可以使用grid.AllCells（ACOL，AROW）。该说明称： “访问网格单元为串不论隐藏的行或列的grid.AllCells返回细胞所显示的，即后事件OnGetDisplText真正的格文本的可能的处理。”。

显示选定单元格，你可以利用他们给你一些额外的功能。从131页的指南：

TAdvStringGrid还提供了一组功能，允许执行真实小区索引的映射可见细胞指标，反之亦然。这提供了通过：

function RealRowIndex(ARow: Integer): Integer; 
function RealColIndex(ACol: Integer): Integer; 

返回给定可见的行或列的索引

function DisplRowIndex(ARow: Integer): Integer; 
function DisplColIndex(ACol: Integer): Integer; 

返回给定实列或行索引可见列或行指数的实际行或列的索引。

所以我认为你可能会发现你被改变你的最后一个方法来寻找的东西：

procedure TForm1.BtnSelectCellClick(Sender: TObject); 
begin 
    AdvStringGrid1.SelectCells(DisplColIndex(MyCol),DisplRowIndex(MyRow),DisplColIndex(MyCol),DisplRowIndex(MyRow)); 
end;