Fix #72

Author: pyscripter

PythonForDelphi/Components/Sources/Core/PythonEngine.pas

@@ -4916,7 +4916,7 @@ procedure TPythonEngine.Initialize;
   AssignPyFlags;
   if FPythonHomeW <> '' then begin
     if IsPython3000 then
-      Py_SetPythonHome3000(PChar(FPythonHomeW))
+      Py_SetPythonHome3000(PWideChar(FPythonHomeW))
     else
       Py_SetPythonHome(PAnsiChar(FPythonHome));
   end;