TPyClassWrapper methods declared private. Documentation improved.

pyscripter · pyscripter · commit d1951c18d614 · 2024-10-01T00:24:22.000-04:00
diff --git a/Source/WrapDelphi.pas b/Source/WrapDelphi.pas
@@ -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
