%!s(int64=4) %!d(string=hai) anos · d69b7e791b
--- a/packages/rtl/classes.pas
+++ b/packages/rtl/classes.pas
@@ -8159,7 +8159,7 @@ begin
 
				         SetOrdProp(Instance, PropInfo, ReadInteger);
			
 
				       end;
			
 
				     tkBool:
			
 
				-      SetOrdProp(Instance, PropInfo, Ord(ReadBoolean));
			
 
				+      SetBoolProp(Instance, PropInfo, ReadBoolean);
			
 
				     tkChar:
			
 
				       SetOrdProp(Instance, PropInfo, Ord(ReadChar));
			
 
				     tkEnumeration: