diff --git a/X2Log.JsonDataObjects.pas b/X2Log.JsonDataObjects.pas index 3ecef83..9d1306f 100644 --- a/X2Log.JsonDataObjects.pas +++ b/X2Log.JsonDataObjects.pas @@ -1036,7 +1036,7 @@ type private FDataString: UTF8String; protected - function Realloc(var NewCapacity: Longint): Pointer; override; + function Realloc(var NewCapacity: NativeInt): Pointer; override; public constructor Create; property DataString: UTF8String read FDataString; @@ -1047,7 +1047,7 @@ type private FBytes: TBytes; protected - function Realloc(var NewCapacity: Longint): Pointer; override; + function Realloc(var NewCapacity: NativeInt): Pointer; override; public constructor Create; property Bytes: TBytes read FBytes; @@ -7817,7 +7817,7 @@ begin SetPointer(nil, 0); end; -function TJsonUTF8StringStream.Realloc(var NewCapacity: Longint): Pointer; +function TJsonUTF8StringStream.Realloc(var NewCapacity: NativeInt): Pointer; var L: Longint; begin @@ -7855,7 +7855,7 @@ begin SetPointer(nil, 0); end; -function TJsonBytesStream.Realloc(var NewCapacity: Longint): Pointer; +function TJsonBytesStream.Realloc(var NewCapacity: NativeInt): Pointer; var L: Longint; begin