The get JSON Value activity can be used to get a variable from an existing JSON Value.
Activity properties
begin var MenuJSON: TJSONValue; MenuJSON := JSON.GetValue<TJSONValue>('menu'); end; |
Resulting code
The 'Key name with value' must be a attribute of the provided JSON Value.
The data type could be any data type if the value of the attribute can be parsed into an object.
e.g.
begin var JSON: TJSONValue; JSON := TJsonObject.ParseJsonValue('{"menu": {' + ' "id": "other",' + ' "value": "File",' + ' "popup": {' + ' "menuitem": [' + ' {"value": "New", "onclick": "CreateNewDoc()"},' + ' {"value": "Open", "onclick": "OpenDoc()"},' + ' {"value": "Close", "onclick": "CloseDoc()"}' + ' ]' + ' }' + '}}'); var menu: HelpAndManualScreenshots.DataSource.JSONMenuDataSource.Imenu; var JsonAdapter: ICodolexEntityJSONAdapter<HelpAndManualScreenshots.DataSource.JSONMenuDataSource.Imenu>; JsonAdapter := TmenuJSONAdapter.Create; var KeyNameValue := JSON.GetValue<TJsonValue>('menu'); var JsonValue := JsonAdapter.MapToEntity(KeyNameValue); menu := JsonValue; var DialogResult: Integer; DialogResult := MessageDlg(menu.id, TMsgDlgType.mtInformation, [TMsgDlgBtn.mbOK], 0); end; |