We just updated our Component Pack subscription and our application started to have a lot of GridIndexOutOfRange exceptions.
I managed to pinpoint error to ClearRowSelect, DisjunctRowSelect=true and RowSelect=true combination.
If I use ClearRowSelect before setting grid RowCount I'll get an exception, but just first time after application launch. New RowCount needs to be larger than previous in this case.
If I set RowCount before ClearRowSelect, I don't get the exception right away. But then when I click any row in grid I'll get the same exception.
I tried to set RowSelect[index] to false on all rows, but than again I'll get exception when I'll click any row.
Any workarounds? Using DisjunctRowSelect without RowSelect seems to be working, but is kind of an ugly solution.
Minimal example to reproduce is to add a columngrid to form and set DisjunctRowSelect=true and RowSelect=true. Then add one edit and two buttons.
Event handlers
procedure TForm1.AdvColumnGrid1GetDisplText(Sender: TObject; ACol,:
ARow: Integer; var Value: string);
begin
if (ARow > 0) and (ACol > 0) then
Value := Format('[%d : %d]', [ARow, ACol]);
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
AdvColumnGrid1.ClearRowSelect;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
AdvColumnGrid1.RowCount := StrToInt(Edit1.Text);
end;