chg: Code refactor - Fix Windows freezing !minor

lcgamboa · Feb 4, 2024 · 8ae981d · 8ae981d
1 parent c9b3a86
commit 8ae981d
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 3 deletions.
diff --git a/VERSION b/VERSION
@@ -2,5 +2,5 @@ PACKAGE=picsimlab
 MAINVER=0
 MINORVER=9
 VERSION=0.9.1
-DATE=240201
+DATE=240204
 VERSION_STABLE=0.9.1
diff --git a/src/picsimlab1.cc b/src/picsimlab1.cc
@@ -2148,8 +2148,8 @@ int CPWindow1::OnExtraWindowCmd(const int id, const char* ControlName, const PIC
         case PWA_WINDOWDESTROY:
             ((CPWindow*)ctrl)->Hide();
             ((CPWindow*)ctrl)->DestroyChilds();
+            ((CPWindow*)ctrl)->SetCanDestroy(true);
             ((CPWindow*)ctrl)->WDestroy();
-            delete ctrl;
             ctrl = NULL;
             break;
         case PWA_WINDOWLOADXML:

diff --git a/src/picsimlab5.cc b/src/picsimlab5.cc
@@ -1271,8 +1271,8 @@ int CPWindow5::OnExtraWindowCmd(const int id, const char* ControlName, const PIC
         case PWA_WINDOWDESTROY:
             ((CPWindow*)ctrl)->Hide();
             ((CPWindow*)ctrl)->DestroyChilds();
+            ((CPWindow*)ctrl)->SetCanDestroy(true);
             ((CPWindow*)ctrl)->WDestroy();
-            delete ctrl;
             ctrl = NULL;
             break;
         case PWA_WINDOWLOADXML: