mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-15 05:59:30 +02:00
lcl, fix TDbgrid wrong width of first column if FixedCells>1 and dgIndicator is turned off, issue #35716
git-svn-id: trunk@61740 -
This commit is contained in:
parent
f13e53bf2f
commit
563a44c1d6
@ -2582,7 +2582,7 @@ function TCustomGrid.GetColWidths(Acol: Integer): Integer;
|
|||||||
var
|
var
|
||||||
C: TGridColumn;
|
C: TGridColumn;
|
||||||
begin
|
begin
|
||||||
if not Columns.Enabled or (aCol<FixedCols) then
|
if not Columns.Enabled or (aCol<FirstGridColumn) then
|
||||||
begin
|
begin
|
||||||
if IsColumnIndexValid(aCol) then
|
if IsColumnIndexValid(aCol) then
|
||||||
Result:=FCols[aCol]
|
Result:=FCols[aCol]
|
||||||
|
Loading…
Reference in New Issue
Block a user