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

Qt,Qt5: ReleaseCapture when app is deactivated.

Browse Source
This commit is contained in:
Željan Rikalo 2021-10-14 18:28:29 +02:00
parent 6118e64e85
commit f1156f551a
2 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
lcl/interfaces/qt/qtobject.inc
View File

@ -850,6 +850,7 @@ begin
DebugLn('TQtWidgetSet.EventFilter: Application is deactivated: ',dbgs(GetTickCount));
{$ENDIF}
FAppActive := False;
ReleaseCapture;
Application.IntfAppDeactivate;
Result := True;
end;

1
lcl/interfaces/qt5/qtobject.inc
View File

@ -831,6 +831,7 @@ begin
{$IF DEFINED(QTDEBUGAPPACTIVATE) OR DEFINED(VerboseQtEvents)}
DebugLn('TQtWidgetSet.EventFilter: Application is deactivated: ',dbgs(GetTickCount));
{$ENDIF}
ReleaseCapture;
Application.IntfAppDeactivate;
Result := True;
end;