sync P4D, about TPythonThread

Author: Alexey-T

python4lazarus/PythonEngine.pas

@@ -2617,17 +2617,15 @@   TPythonThread = class(TThread)
   protected
     procedure ExecuteWithPython; virtual; abstract;
   public
-    procedure Py_Begin_Allow_Threads;
-    procedure Py_End_Allow_Threads;
+    class procedure Py_Begin_Allow_Threads;
+    class procedure Py_End_Allow_Threads;
     // The following procedures are redundant and only for
     // compatibility to the C API documentation.
-    procedure Py_Begin_Block_Threads;
-    procedure Py_Begin_Unblock_Threads;
+    class procedure Py_Begin_Block_Threads;
+    class procedure Py_Begin_Unblock_Threads;
 
-    property ThreadState: PPyThreadState read  fThreadState
-                                         write fThreadState;
-    property ThreadExecMode: TThreadExecMode read fThreadExecMode
-                                             write fThreadExecMode;
+    property ThreadState : PPyThreadState read  fThreadState;
+    property ThreadExecMode: TThreadExecMode read fThreadExecMode write fThreadExecMode;
   end;
 {$HINTS ON}
 
@@ -8462,24 +8460,24 @@ procedure TPythonThread.Execute;
 end;
 
 
-procedure TPythonThread.Py_Begin_Allow_Threads;
+class procedure TPythonThread.Py_Begin_Allow_Threads;
 begin
   with GetPythonEngine do
     f_savethreadstate := PyEval_SaveThread;
 end;
 
-procedure TPythonThread.Py_End_Allow_Threads;
+class procedure TPythonThread.Py_End_Allow_Threads;
 begin
   with GetPythonEngine do
     PyEval_RestoreThread( f_savethreadstate);
 end;
 
-procedure TPythonThread.Py_Begin_Block_Threads;
+class procedure TPythonThread.Py_Begin_Block_Threads;
 begin
   Py_End_Allow_Threads;
 end;
 
-procedure TPythonThread.Py_Begin_Unblock_Threads;
+class procedure TPythonThread.Py_Begin_Unblock_Threads;
 begin
   Py_Begin_Allow_Threads;
 end;