pyscripter
diff --git a/‎Demos/Demo36/ParallelPython.dpr
Copy file name to clipboardExpand all lines: Demos/Demo36/ParallelPython.dpr
+1Lines changed: 1 addition & 0 deletions b/‎Demos/Demo36/ParallelPython.dpr
Copy file name to clipboardExpand all lines: Demos/Demo36/ParallelPython.dpr
+1Lines changed: 1 addition & 0 deletions
diff --git a/‎Source/WrapDelphi.pas
Copy file name to clipboardExpand all lines: Source/WrapDelphi.pas
+6-5Lines changed: 6 additions & 5 deletions b/‎Source/WrapDelphi.pas
Copy file name to clipboardExpand all lines: Source/WrapDelphi.pas
+6-5Lines changed: 6 additions & 5 deletions
@@ -109,6 +109,7 @@ begin
       WriteLn('Elapsed ms: ' + SW.ElapsedMilliseconds.ToString);
       WriteLn;
     finally
+      Sleep(1000);  // allow some time for the threads to terminate
       DestroyEngine;
     end;
   except
 
@@ -616,25 +616,26 @@   TPyDelphiObjectClass = class of TPyDelphiObject;
     Generic wrapper for pascal classes
 
     Can be used from unit wrappers as follows:
-      APyDelphiWrapper.RegisterDelphiWrapper(TPyClassWrapper<TMyClass>);
+      PyDelphiWrapper1.RegisterDelphiWrapper(TPyClassWrapper<TMyClass>);
     or at runtime (e.g. inside the FormCreate handler:
       PyDelphiWrapper1.RegisterDelphiWrapper(TPyClassWrapper<TMyClass>).Initialize;
 
     if you want your class to capable of being instantiated from python then do:
 
-    TTestWrapper = class(TPyClassWrapper<TTest>)
+    TMyClassWrapper = class(TPyClassWrapper<TMyClass>)
       constructor CreateWith(APythonType: TPythonType; args, kwds: PPyObject); overload; override;
     end;
 
-    constuctor TTestWrapper.CreateWith(APythonType: TPythonType; args, kwds: PPyObject);
+    constuctor TMyClassWrapper.CreateWith(APythonType: TPythonType; args, kwds: PPyObject);
     begin
       Create(APythonType);
-      DelphiObject := TTest.Create;
+      DelphiObject := TMyClass.Create;
     end;
 
-    PyDelphiWrapper1.RegisterDelphiWrapper(TTestWrapper).Initialize;
+    PyDelphiWrapper1.RegisterDelphiWrapper(TMyClassWrapper).Initialize;
   }
   TPyClassWrapper<T: class> = class(TPyDelphiObject)
+  private
     function GetDelphiObject: T;
     procedure SetDelphiObject(const Value: T);
   public