diff --git a/components/lclextensions/include/qt/delphicompat.inc b/components/lclextensions/include/qt/delphicompat.inc
index 6376719174..8c42ba0142 100644
--- a/components/lclextensions/include/qt/delphicompat.inc
+++ b/components/lclextensions/include/qt/delphicompat.inc
@@ -241,7 +241,7 @@ procedure TQtTimerEx.signalWidgetDestroyed; cdecl;
 begin
   Stop;
   FTimerList.Delete(FHandle, FID);
-  Destroy;
+  Release;
 end;
 
 procedure TQtTimerEx.signalTimeout; cdecl;
diff --git a/components/lclextensions/include/qt5/delphicompat.inc b/components/lclextensions/include/qt5/delphicompat.inc
index dca193738e..b7c8bd89be 100644
--- a/components/lclextensions/include/qt5/delphicompat.inc
+++ b/components/lclextensions/include/qt5/delphicompat.inc
@@ -241,7 +241,7 @@ procedure TQtTimerEx.signalWidgetDestroyed; cdecl;
 begin
   Stop;
   FTimerList.Delete(FHandle, FID);
-  Destroy;
+  Release;
 end;
 
 procedure TQtTimerEx.signalTimeout; cdecl;