Delphi是一個強大的編程語言，被廣泛用于Windows平臺的軟件開發。而隨著Web技術的飛速發展，Delphi也逐漸向Web應用領域拓展。在Delphi中，我們可以通過Web模塊實現Web應用的開發。而其中一個重要的技術點就是處理JSON數據格式。

function TForm1.Button1Click(Sender: TObject);
var
LHttpClient: THttpClient;
LParams: TStringList;
LJSON: TJSONObject;
begin
LHttpClient := THTTPClient.Create;
try
LParams := TStringList.Create;
try
LParams.Add('param1=value1');
LJSON := TJSONObject.Create;
try
LJSON.AddPair('key1', 'value1');
LJSON.AddPair('key2', 'value2');
LParams.Add('param2=' + LJSON.ToJSON);
Memo1.Lines.Text := LHttpClient.Post('http://example.com', LParams);
finally
LJSON.Free;
end;
finally
LParams.Free;
end;
finally
LHttpClient.Free;
end;
end;

在上面的代碼中，我們使用了Delphi XE6提供的THttpClient來發送POST請求，同時將JSON數據作為參數的一部分。在TJSONObject中，我們可以使用AddPair方法來添加鍵值對。而在發送請求時，通過LJSON.ToJSON方法將JSON數據轉換為字符串，并作為param2的值傳遞。當服務器返回結果時，我們可以通過Memo1控件將結果展示在界面上。