diff --git a/Quick.Json.Serializer.pas b/Quick.Json.Serializer.pas
index 12a91dc..593bc4d 100644
--- a/Quick.Json.Serializer.pas
+++ b/Quick.Json.Serializer.pas
@@ -1065,7 +1065,7 @@ function TRTTIJson.GetPropertyValue(Instance : TObject; const PropertyName : str
     {$ELSE}
     tkEnumeration :
       begin
-        if fUseEnumNames then Result := GetEnumName(@pinfo.PropType,GetOrdProp(Instance,PropertyName))
+        if fUseEnumNames then Result := GetEnumName(PTypeInfo(pinfo.PropType),GetOrdProp(Instance,PropertyName))
           else Result := GetOrdProp(Instance,PropertyName);
       end;
     {$ENDIF}