delphi THTTPClient PostURL

本文整理自网络，侵删。

 
function PostURL(const AURL: string; Parameters: TStrings): string;
var
  HttpClient: THttpClient;
  HttpResponse: IHttpResponse;
begin
  HttpClient := THTTPClient.Create;
  try
    HttpClient.ConnectionTimeout:=3000;
    HttpClient.ResponseTimeout:=3000;
    HttpResponse := HttpClient.Post(AURL, Parameters, nil, TEncoding.UTF8);
    Result := HttpResponse.ContentAsString();
  finally
    HttpClient.Free;
  end;
end;
 

相关阅读 >>

Delphi for 循环输出 a-z

Delphi 获取网页源代码的最简单办法

Delphi 24位真彩色图形转化为ico文件

Delphi 读取网上的文本文件

Delphi 另类计算程序代码运行耗时

Delphi中始终用webbrowser打开网页

Delphi function 与 procedure

Delphi 正则提取txt中的email 数据

Delphi 用内存流文件流资源生成客户端

dll 使用 pchar 参数的小例子

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi THTTPClient PostURL