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

Qt: invalidate clientrect cache when viewport of scrollable form is resized.QTSCROLLABLEFORMS part.

Browse Source 
git-svn-id: trunk@43241 -
This commit is contained in:
zeljko 2013-10-14 06:21:35 +00:00
parent 4f8bfb32e9
commit 108e9a59dc
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -6055,11 +6055,15 @@ begin
HaveVertBar := Assigned(FVScrollbar);
HaveHorzBar := Assigned(FHScrollbar);
if (caspComputingBounds in LCLObject.AutoSizePhases) then
begin
{$IF DEFINED(VerboseQt) OR DEFINED(VerboseQtCustomControlResizeDeadlock)}
writeln('*** INTERCEPTED RESIZE DEADLOCK *** ',LCLObject.ClassName,
':',LCLObject.Name)
{$ENDIF}
else
{$IFDEF QTSCROLLABLEFORMS}
LCLObject.InvalidateClientRectCache(True);
{$ENDIF}
end else
LCLObject.DoAdjustClientRectChange(HaveVertBar or HaveHorzBar);
end else
LCLObject.DoAdjustClientRectChange;