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

Qt5, Qt6: stop warnings about uninitialized paint engine. issue #41304

Browse Source
This commit is contained in:
zeljan1 2025-01-03 13:59:44 +01:00
parent bfd5b97aab
commit 619d76cdb7
2 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lcl/interfaces/qt5/qtwscontrols.pp
View File

@ -436,6 +436,9 @@ begin
if not WSCheckHandleAllocated(AWincontrol, 'PaintTo') or (ADC = 0) then
Exit;
if not AWinControl.Visible or not TQtWidget(AWinControl.Handle).getVisible then
exit;
Widget := TQtWidget(AWinControl.Handle);
ARect := Widget.getFrameGeometry;

3
lcl/interfaces/qt6/qtwscontrols.pp
View File

@ -434,6 +434,9 @@ begin
if not WSCheckHandleAllocated(AWincontrol, 'PaintTo') or (ADC = 0) then
Exit;
if not AWinControl.Visible or not TQtWidget(AWinControl.Handle).getVisible then
exit;
Widget := TQtWidget(AWinControl.Handle);
ARect := Widget.getFrameGeometry;