TAdvStringGrid.GetSelectedCellsCount Problem

VCL TMS VCL UI Pack
1

Hi.    I've already reported this to the support team thru email, but I'd like to know if anyone else is experiencing this.  If so, do you perhaps have a work-around or fix that you would be willing to share?  I did get a patch for the GetSelectedCellsCount method in advgrid.pas from TMS support but it didn't work for me.

 
I'm using version 5.0.9 of this component in Delphi 7.  The method is returning a count of 1 when it should be a count of 0.  I have a vcl component named MGrid and is of type TAdvStringGrid.  I can call MGrid.ClearSelectedCells and follow that immediately with a MGrid.GetSelectedCellsCount.  At this point I would expect the returned result to be zero and I am getting a returned result of 1. 
 
Has anyone else seen this? 
 
Thanks!
2

We need details & exact steps how to reproduce this.

With a default grid on the form with the code:

procedure TForm4.Button1Click(Sender: TObject);
begin
  advstringgrid1.ClearSelectedCells;
  showmessage(inttostr(advstringgrid1.SelectedCellsCount));

  advstringgrid1.SelectedCells[1,1] := true;
  showmessage(inttostr(advstringgrid1.SelectedCellsCount));

end;

procedure TForm4.FormCreate(Sender: TObject);
begin
  advstringgrid1.MouseActions.DisjunctCellSelect := true;
end;

everything works as expected.

This test shows:
1)      after ClearSelectedCells, SelectedCellsCount returns  0
2)      after setting 1 SelectedCells[], SelectedCellsCount returns 1

This is all expected and by design.

If a problem persists, please provide clear & full instructions how to reproduce this.