delphi idhttp的用法

本文整理自网络，侵删。

 
idhttp的用法

1）POST

function PostMethod(http: TIDhttp; URL: string; Params: TStringList): string;
var
RespData: TStringStream;
begin
RespData := TStringStream.Create('');
try
try
if http = nil then
Exit;
Http.Post(URL, Params, RespData);
Result := RespData.DataString;
http.Request.Referer := URL;
except
Result := '';
Exit;
end;
finally
http.Disconnect;
FreeAndNil(RespData);
end;

2）GET

function GetMethod(http: TIDhttp; URL: string): string;
var
Resp: TStringStream;
begin
Resp := TStringStream.Create('');
try
try
Http.Get(URL, Resp);
Http.Request.Referer := URL;
Result := Resp.DataString;
except
Result := '';
Exit;
end;
finally
FreeAndNil(Resp);
end;
end;


end;
 

相关阅读 >>

Delphi 在 listbox 中放置一��可�� item 的 tedit �m件

Delphi 官方提供的六十多个firedac例子

Delphi获得某个磁盘或是文件夹的所有子目录

Delphi unigui从数据表里下载流文件

Delphi 网上获取北京时间xmlhttprequest如何访问需要安全验证的网站

Delphi xe 中的字符串生成哈希值（md5 / sha-1 / jenkins）

Delphi研究之驱动开发篇（五）--使用后备列表

Delphi注册与卸载系统服务

Delphi xe版本 运行cmd命令，并取得输出字符

Delphi 实现检测线程类tthread是否结束

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

转载请注明出处：木庄网络博客 » delphi idhttp的用法