delphi xe datasnap rest 相關

最新推荐文章于 2013-11-13 15:29:58 发布

原创最新推荐文章于 2013-11-13 15:29:58 发布 · 3k 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#delphi #rest #dataset #api #json #table

Delphi 专栏收录该内容

22 篇文章

订阅专栏

本文介绍如何使用Delphi编程语言与JSON数据进行交互，包括读取JSON数据、将其转换为Delphi对象以及调用REST API。通过实例演示了从JSON数组中提取信息并显示给用户的过程。

DBXDBReaders.TDBXDataSetReader.CopyReaderToClientDataSet

class
 procedure
 CopyReaderToClientDataSet(
Reader:
 TDBXReader;
  Dataset:
 TClientDataSet)
;
 static;


TDBXReader --> 
TClientDataSet

var ja: TJSONArray;
    va: TJSONValue;
    i: integer;
begin
ja := TJSONArray.Create;
ja.AddElement(TJSONString.Create('Delphi XE程式設計系列 1-主從架構, 多層到JSON和REST'));
ja.AddElement(TJSONString.Create('從原生API到REST API – 使用C++Builder XE開發REST應用程式'));
ja.AddElement(TJSONString.Create('Delphi XE程式設計系列 2-DataSnap/REST伺服器'));

for i :=0 to ja.Size - 1 do
begin
    va := ja.Get(i);
    ShowMessage(va.Value);
end;
ShowMessage(ja.ToString);