ahausladen / JsonDataObjects

JSON parser for Delphi 2009 and newer
MIT License
413 stars 160 forks source link

Added support to set/get variant values and add variant values to JSONArray #9

Closed kattunga closed 9 years ago

kattunga commented 9 years ago

Hi, I added property VariantValue to TJsonDataValue and TJsonDataValueHelper, so now you can do:

var
  v: variant;
begin
  v := jsonobject['my name'].VariantValue; 
  jsonobject['my name'].VariantValue := v;

  jsonarray.Add(v);
end;

Please take a look and let me know I you don't like somethig. I hope you can add in your code.

Regards Christian