procedure TForm2.Button1Click(Sender: TObject); var url: String; HTTP: TIdHTTP; sl: TStringList; res: String; begin HTTP := TIdHTTP.Create; sl := TStringList.Create; try sl.Add('Param1=Data1'); //第一組參考與資料,以下類推… sl.Add('Param2=Data1'); sl.Add('Param3=Data2'); sl.Add('Param4=Data3'); res := HTTP.Post('http://127.0.0.1:8080', sl); Memo1.Lines.Add(res); finally end; end;