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

Qt,Qt5: fixed maximized window with borderstyle = bsnone. issue #39158

Browse Source
This commit is contained in:
Željan Rikalo 2021-10-06 13:46:42 +02:00
parent e8317fb534
commit 29fa1e508e
2 changed files with 12 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lcl/interfaces/qt/qtwsforms.pp
View File

@ -616,6 +616,12 @@ begin
end; end;
{$ENDIF} {$ENDIF}
end; end;
// issue #39158
if AWinControl.HandleObjectShouldBeVisible and
(TCustomForm(AWinControl).BorderStyle = bsNone) and
not Widget.IsMdiChild then
ConstraintsChange(AWinControl);
end; end;
Widget.setVisible(AWinControl.HandleObjectShouldBeVisible); Widget.setVisible(AWinControl.HandleObjectShouldBeVisible);

6
lcl/interfaces/qt5/qtwsforms.pp
View File

@ -637,6 +637,12 @@ begin
end; end;
{$ENDIF} {$ENDIF}
end; end;
// issue #39158
if AWinControl.HandleObjectShouldBeVisible and
(TCustomForm(AWinControl).BorderStyle = bsNone) and
not Widget.IsMdiChild then
ConstraintsChange(AWinControl);
end; end;
Widget.setVisible(AWinControl.HandleObjectShouldBeVisible); Widget.setVisible(AWinControl.HandleObjectShouldBeVisible);