sync P4D, about TTypeServeces

Author: Alexey-T

python4lazarus/PythonEngine.pas

@@ -7230,7 +7230,7 @@ class procedure TPyObject.SetupType(APythonType: TPythonType);
 constructor TTypeServices.Create;
 begin
   inherited;
-  FBasic := [bsGetAttr, bsSetAttr, bsRepr, bsStr];
+  FBasic := [bsGetAttrO, bsSetAttrO, bsRepr, bsStr];
 end;
 
 procedure TTypeServices.AssignTo( Dest: TPersistent );