2 files changed, 6 insertions, 0 deletions
diff --git a/Game/Code/lib/projectM/projectM-0_9.inc b/Game/Code/lib/projectM/projectM-0_9.inc
index 24d83700..4aed3260 100644
--- a/Game/Code/lib/projectM/projectM-0_9.inc
+++ b/Game/Code/lib/projectM/projectM-0_9.inc
@@ -321,6 +321,8 @@ constructor TProjectM.Create(gx, gy: integer; fps: integer;
 var
   state: PProjectMState;
 begin
+  inherited Create();
+
   New(state);
   data := state;
 
@@ -420,5 +422,6 @@ destructor TProjectM.Destroy();
 begin
   Dispose(PProjectMState(data));
   data := nil;
+  inherited;
 end;
 
diff --git a/Game/Code/lib/projectM/projectM-1_0.inc b/Game/Code/lib/projectM/projectM-1_0.inc
index a1c1c1f4..96b224ae 100644
--- a/Game/Code/lib/projectM/projectM-1_0.inc
+++ b/Game/Code/lib/projectM/projectM-1_0.inc
@@ -68,6 +68,8 @@ end;
 
 constructor TProjectM.Create(const configFile: string);
 begin
+  inherited Create();
+
   // we cannot catch C++ exceptions in delphi, so we have to check
   // if configFile is valid first
   if (FileExists(configFile)) then
@@ -166,5 +168,6 @@ destructor TProjectM.Destroy();
 begin
   _projectM_free(data);
   data := nil;
+  inherited;
 end;