function  Deserialize(ABuffer: PJSONValue; ABufSize: Integer): TObject; overload;