字符串逗号分隔为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;

我想知道如何使用字符串作为输入参数编写ConvertStringDelimitedToJsonArray函数并输出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;