Hi,
Does anyone have an example on how to parse data with JSON? I am very new to JSON...
The following code gives an exception: EJSON, Cannot convert data from object value.
uses
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls,
fpjson;
// ...
procedure TForm1.Button1Click(Sender: TObject);
var
json : TJSONObject;
begin
json := TJSONObject.Create;
try
json.Add('Age',32);
Memo1.lines.text := json.AsString;
finally
json.Free;
end;
end;