Delphi Xe DataSnap Rest + Flex 开发基本探索2(取得Json 数组)

最新推荐文章于 2020-06-12 16:05:17 发布

CoderOfDelphi

最新推荐文章于 2020-06-12 16:05:17 发布

阅读量1.4k

点赞数

分类专栏： delphi Xe DataSnap 开发文章标签： delphi flex json arraylist

本文链接：https://blog.csdn.net/hecongzhen/article/details/39053071

版权

本篇博客继续《Delphi Xe DataSnap REST 基本探索》系列，重点讲述如何通过 DataSnap REST 服务返回 JSON 数组，并在 Flex 客户端进行处理。后台代码返回了一个包含中文的 JSON 数组，前台通过解析该数据实现了数据显示。

摘要由CSDN通过智能技术生成

看本文章前请参考基本探索1 的部分内容

下面介绍如何从datasnap rest 服务返回 JsonArray 数组

后台代码

声明
 function GetArr:TJSONArray;
实现

function TSMTest.GetArr:TJSONArray;
var
  arr:TjsonArray;//TStrArr;
  I: Integer;
begin
 // SetLength(arr,5);
  arr:=TjsonArray.Create;
  for I := 0 to 5 do
  begin
    arr.Add( '字符串数组'+inttostr(i));
  end;
  result := arr;
end;

前台Flex 返回Json数据

{"result":[["\u5B57\u7B26\u4E32\u6570\u7EC40","\u5B57\u7B26\u4E32\u6570\u7EC41","\u5B57\u7B26\u4E32\u6570\u7EC42","\u5B57\u7B26\u4E32\u6570\u7EC43","\u5B57\u7B26\u4E32\u6570\u7EC44","\u5B57\u7B26\u4E32\u6570\u7EC45"]]}

里面有中文 Json 自己编码了

前台效果如图