Fix pyscripter#446

Author: pyscripter

Demos/Demo06/Unit1.pas

@@ -165,7 +165,7 @@ function  PyPoint_getattr(obj : PPyObject; key : PAnsiChar) : PPyObject; cdecl;
           // Else check for a method
           Result := PyObject_GenericGetAttr(obj, PyUnicodeFromString(key));
           if not Assigned(Result) then
-            PyErr_SetString (PyExc_AttributeError^, PAnsiChar(Format('Unknown attribute "%s"',[key])));
+            PyErr_SetString (PyExc_AttributeError^, PAnsiChar(Utf8Encode(Format('Unknown attribute "%s"',[key]))));
         end;
     end;
 end;
@@ -186,7 +186,7 @@ function  PyPoint_setattrfunc(obj : PPyObject; key : PAnsiChar; value : PPyObjec
             Result := 0;
           end
         else
-          PyErr_SetString (PyExc_AttributeError^, PAnsiChar(Format('Attribute "%s" needs an integer',[key])));
+          PyErr_SetString (PyExc_AttributeError^, PAnsiChar(Utf8Encode(Format('Attribute "%s" needs an integer',[key]))));
       // Check for attribute y
       end else if key = 'y' then begin
         if PyLong_Check(value) then
@@ -195,9 +195,9 @@ function  PyPoint_setattrfunc(obj : PPyObject; key : PAnsiChar; value : PPyObjec
             Result := 0;
           end
         else
-          PyErr_SetString (PyExc_AttributeError^, PAnsiChar(Format('Attribute "%s" needs an integer',[key])));
+          PyErr_SetString (PyExc_AttributeError^, PAnsiChar(Utf8Encode(Format('Attribute "%s" needs an integer',[key]))));
       end else
-        PyErr_SetString (PyExc_AttributeError^, PAnsiChar(Format('Unknown attribute "%s"',[key])));
+        PyErr_SetString (PyExc_AttributeError^, PAnsiChar(Utf8Encode(Format('Unknown attribute "%s"',[key]))));
     end;
 end;
 

Source/PythonEngine.pas

@@ -8859,10 +8859,10 @@ procedure TPythonType.Initialize;
         Module.AddClient( Self );
     end;
   InitServices;
-  if Engine.PyType_Ready(TheTypePtr) <> 0 then
-    Engine.CheckError;
   FType.tp_pythontype := Self;  // Store self into FType
   inherited;
+  if Engine.PyType_Ready(TheTypePtr) <> 0 then
+    Engine.CheckError;
 end;
 
 procedure TPythonType.Finalize;