字符串逗号划分为jsonarray

Question

我正在使用delphi xe7，win8.1

我的问题很简单，但是我是Json的新手。

我有一个逗号界的字符串可以转换为jsonarray。

var s:string;
    ja:JSONArray;
begin
s:='a,b,c,d,e,f';//--> can have many items comma delimited.
ja:=JSONArray.Create;
//???Convert string comma delimited to JSONArray
ja:=ConvertStringDelimitedToJsonArray(s);
end;

我想知道如何用字符串为输入参数并输出JSONARRAY。

是否有Delphi功能可以直接执行？

Answer 1

json数组只是由逗号划分的元素列表，并由方括号封闭，所以我认为鉴于您的输入数据，您可以简单地做类似的事情：

s := 'a,b,c,d,e,f';
s := Format("[%s]", [s]);
ja := TJSONObject.ParseJSONValue(TEncoding.ASCII.GetBytes(s),0) as TJSONArray;