paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-23 07:59:44 +02:00
Code Issues Packages Projects Releases Wiki Activity

Qt: fixed font assignment when parentFont=false and font is default one. issue #28437

Browse Source 
git-svn-id: trunk@49730 -
This commit is contained in:
zeljko 2015-08-31 07:57:36 +00:00
parent 3c0233d4ed
commit cee72b713e
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lcl/interfaces/qt/qtwscontrols.pp
View File

@ -551,6 +551,11 @@ begin
Widget := TQtWidget(AWinControl.Handle);
Widget.BeginUpdate;
// issue #28437
if AWinControl.HandleObjectShouldBeVisible and not AWinControl.IsParentFont and
(AWinControl.Font.Name = 'default') then
SetFont(AWinControl, AWinControl.Font);
Widget.setVisible(AWinControl.HandleObjectShouldBeVisible);
Widget.EndUpdate;
end;