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

Qt,Qt5: use Release() instead of Destroy() to prevent potential crash.

Browse Source
This commit is contained in:
Željan Rikalo 2022-06-13 14:28:11 +02:00
parent d58e00b0d1
commit 68b7b9fad9
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/lclextensions/include/qt/delphicompat.inc
View File

@ -241,7 +241,7 @@ procedure TQtTimerEx.signalWidgetDestroyed; cdecl;
begin
Stop;
FTimerList.Delete(FHandle, FID);
Destroy;
Release;
end;
procedure TQtTimerEx.signalTimeout; cdecl;

2
components/lclextensions/include/qt5/delphicompat.inc
View File

@ -241,7 +241,7 @@ procedure TQtTimerEx.signalWidgetDestroyed; cdecl;
begin
Stop;
FTimerList.Delete(FHandle, FID);
Destroy;
Release;
end;
procedure TQtTimerEx.signalTimeout; cdecl;