JSON 3.3 Delphi/C++ Builder 5 - XE7 and Lazarus 1.2.6

JSON 3.3 Delphi/C++ Builder 5 - XE7 and Lazarus 1.2.6
JSON 3.3 Delphi/C++ Builder 5 - XE7 and Lazarus 1.2.6 | 3 Mb


Delphi and C++ Builder javascript Object Notation (JSON) library.

Features

Read and modify existing JSON files
Create new JSON files
Full JSON supported: literals, numbers, strings, arrays and objects
Date/time encoding and decoding supported
Customizable output
Supports Windows 32, Windows 64, OS X, iOS and Android
Available for Delphi/C++ Builder 5 - XE7 and Lazarus 1.2.6
Source code included in full version
Royalty free distribution in applications

Read and modify existing json files:

var Json: TJson;

with TJsonParser.Create do
try
Json := ParseUtf8File('c:\data.json');
try
ShowMessage(Json.ToString);
finally
if not Json.IsLiteral then
Json.Free;
end;
finally
Free;
end;

Create new json files:

var
MyArray: TJsonArray;
MyObject: TJsonObject;

with TJsonObject.Create do
try
SetNull('Null');
SetTrue('True');
SetFalse('False');
SetNumber('Number', 1.23);
SetString('String', 'hello');
SetDateTime('DateTime', Now);

MyArray := SetArray('Array', 3);
MyArray.SetString(0, 'First item');
MyArray.SetString(1, 'Second item');
MyArray.SetNumber(2, 3.21);

MyObject := SetObject('Object');
MyObject.SetString('First Member', 'Hello');
MyObject.SetString('Second Member', 'World');
MyObject.SetFalse('Third Member');
MyObject.SetTrue('Fourth Member');
MyObject.SetNumber('Other Member', 1.11);

ShowMessage(ToString);
ToUtf8File('c:\new.json');
finally
Free;
end;


Use fast, streaming TJsonWriter to create json file without in-memory overhead of TJson objects:

with TJsonWriter.Create('c:\data.json') do
try
BeginObject;
WriteNull('Null');
Write('True', True);
Write('False', False);
Write('Number', 1.23);
Write('String', 'hello');
Write('DateTime', Now, 0);

BeginArray('Array');
Write('First item');
Write('Second item');
Write(3.21);
EndArray;

BeginObject('Object');
Write('First Member', 'Hello');
Write('Second Member', 'World');
Write('Third Member', False);
Write('Fourth Member', True);
Write('Other Member', 1.11);
EndObject;
EndObject;

Check;
finally
Free;
end;


Home:
http://www.winsoft.sk


DOWNLOAD
Information
Users of Guests are not allowed to comment this publication.