paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-22 16:19:36 +02:00
Code Issues Packages Projects Releases Wiki Activity

lcl: grids: fix after r53574 #0296fdc7ae

Browse Source 
git-svn-id: trunk@53575 -
This commit is contained in:
ondrej 2016-12-06 14:48:22 +00:00
parent 0296fdc7ae
commit 6b37ddd73e
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lcl/grids.pas
View File

@ -6734,9 +6734,9 @@ begin
for i := Columns.Count - 1 downto 0 do
begin
C := Columns.Items[i];
C.MaxSize := Round(MaxSize * AXProportion);
C.MinSize := Round(MinSize * AXProportion);
C.Width := Round(Width * AXProportion);
C.MaxSize := Round(C.MaxSize * AXProportion);
C.MinSize := Round(C.MinSize * AXProportion);
C.Width := Round(C.Width * AXProportion);
end;
for i := RowCount - 1 downto 0 do