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 如何读取文件头判断文件类型

Delphi cxgrid中回车键光标移到下列

Delphi webbrowser 滚动条的去除、边框去除

Delphi 中format的字符串格式化使用说明

Delphi xe10.x 快捷失灵解决办法

Delphi ttask无法传递参数的一个解决方案

Delphi 在win32程序中显示dos调试窗口

Delphi 学习 sql 语句 - select(8): 分组条件

Delphi 最好的线程操作

Delphi 的内存操作函数(2): 给数组指针分配内存

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