本文整理自网络,侵删。
uses IdMultipartFormData;
{ .... }
procedure TForm1.Button1Click(Sender: TObject);var data: TIdMultiPartFormDataStream;begin data := TIdMultiPartFormDataStream.Create; try { add the used parameters for the script } data.AddFormField('param1', 'value1'); data.AddFormField('param2', 'value2'); data.AddFormField('param3', 'value3');
{ Call the Post method of TIdHTTP and read the result into TMemo } Memo1.Lines.Text := IdHTTP1.Post('http://localhost/script.php', data); finally data.Free; end;end;
相关阅读 >>
winapi 字符及字符串函数(8): ischarupper - 是否是个大写字母
更多相关阅读请进入《Delphi》频道 >>