Delphi 作為一種編程語言，可以幫助我們處理各種各樣的數據，其中包括 JSON 數據。本文將介紹如何在 Delphi 中打印 JSON 數據。

首先，我們需要使用 JSON 單元。JSON 單元提供了一些方法來構建以及解析 JSON 數據。

uses
JSON;
var
jsonObj: TJSONObject;
begin
jsonObj := TJSONObject.Create;
jsonObj.AddPair('name', 'John');
jsonObj.AddPair('age', 25);
Writeln(jsonObj.ToString);
jsonObj.Free;
end;

以上代碼將創建一個 JSON 對象，并添加兩個屬性：name 和 age。ToString 方法用于將 JSON 對象轉換為字符串，以便打印使用。

如果我們想要打印數組類型的 JSON 數據，我們可以使用 TJSONArray 類。

uses
JSON;
var
jsonArray: TJSONArray;
i: Integer;
begin
jsonArray := TJSONArray.Create;
jsonArray.Add('apple');
jsonArray.Add('orange');
jsonArray.Add('banana');
for i := 0 to jsonArray.Count - 1 do
Writeln(jsonArray.Items[i].Value);
jsonArray.Free;
end;

以上代碼將創建一個 JSON 數組，并添加三個元素：apple、orange 和 banana。我們使用 for 循環來遍歷數組并打印其中的每一個元素。

需要注意的是，在打印 JSON 數據時，我們需要使用特殊字符來分隔不同的數據部分。這通常需要一些額外的編碼工作。

以上就是在 Delphi 中打印 JSON 數據的介紹，希望對您有所幫助。