paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-11 21:55:56 +02:00
Code Issues Packages Projects Releases Wiki Activity

qt: fix some qt sizing problems (bug #0013079)

Browse Source 
git-svn-id: trunk@18521 -
This commit is contained in:
paul 2009-01-31 19:52:03 +00:00
parent aa8e136984
commit 55eebeed17
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lcl/interfaces/qt/qtwidgets.pas
View File

@ -1408,8 +1408,10 @@ begin
// apply initial position and size // apply initial position and size
move(FParams.X, FParams.Y); move(FParams.X, FParams.Y);
if GetContainerWidget <> Widget then
QWidget_resize(GetContainerWidget, FParams.Width, FParams.Height);
resize(FParams.Width, FParams.Height); resize(FParams.Width, FParams.Height);
FScrollX := 0; FScrollX := 0;
FScrollY := 0; FScrollY := 0;
@ -4006,7 +4008,7 @@ begin
QWidget_setAttribute(Result, QtWA_DeleteOnClose); QWidget_setAttribute(Result, QtWA_DeleteOnClose);
{$ENDIF} {$ENDIF}
end; end;
QWidget_setAttribute(Result, QtWA_NoMousePropagation); QWidget_setAttribute(Result, QtWA_NoMousePropagation);
end; end;