Delphi5是一個深受程序員喜歡的編程語言，它可以開發各種各樣的應用程序。隨著互聯網的發展，json作為一種輕量級的數據交換格式也越來越流行。本文將介紹Delphi5中如何使用json進行數據交換。

var
json: string;
jsonObj: TJSONObject;
begin
jsonObj := TJSONObject.Create;
jsonObj.AddPair('name', 'Tom');
jsonObj.AddPair('age', TJSONNumber.Create(25));
json := jsonObj.ToString;
ShowMessage(json);
end;

在上面的代碼中，我們創建了一個TJSONObject對象，并通過AddPair方法添加了兩組鍵值對。其中，第一個鍵值對的值是一個字符串類型，使用AddPair方法直接添加即可；第二個鍵值對的值是一個整數類型，需要先用TJSONNumber類型的Create方法將整數轉換為json格式的數字，再通過AddPair方法添加到json對象中。

最后，使用ToString方法將json對象轉換成字符串類型，然后通過ShowMessage方法彈出對話框顯示json字符串內容。

在實際開發中，我們可能需要使用第三方庫來處理json數據。Delphi5中可以使用SuperObject，它是一個輕量級的json庫，使用簡單方便。

var
json: string;
jsonObj: ISuperObject;
begin
jsonObj := SO('{"name": "Tom", "age": 25}');
json := jsonObj.AsJSon;
ShowMessage(json);
end;

上面的代碼中，我們使用SuperObject的SO方法直接將json字符串轉換為ISuperObject類型的對象，然后調用AsJSon方法將ISuperObject類型對象轉換為json字符串類型。

總的來說，Delphi5使用json進行數據交換非常方便。無論是通過自帶的TJSONObject還是第三方庫SuperObject都可以實現快速、簡單的json數據處理。如果你還沒有開始使用json，請嘗試一下吧！