Forum > LCL

Trouble with TStringGrid during designtime.

(1/1)

DelphiUser:
Hi,
I was playing around a little with Lazarus (win32) but getting Index out of list error.

Here the steps to reproduce:

1. New project.
2. Place a stringgrid onto the form.
3. Try to click onto the horizontal or vertical scrollbar.---> crash

I had a short look at the code and found some nasty stuff in
Grids.pas.

function TCustomGrid.Getcolwidths(Acol: Integer): Integer;
begin
  Result:=Integer(FCols[aCol]);
  if result<0 then Result:=fDefColWidth;
end;

Accessing an array or list without checking the index will sooner or later end up in an exception !

Regards.

jesusr:
Just for the record. This was fixed

Navigation

[0] Message Index