Delphi下idHTTP配合CookieManager获取Cookie

本文整理自网络，侵删。

 
procedure TForm1.Button1Click(Sender: TObject);
var
  Cookies: TidCookies;
  i: integer;
begin
  Memo1.Clear;
  idHTTP1.ProtocolVersion := pv1_1;
  Memo1.Clear;
  IdHTTP1.ProtocolVersion := pv1_1;
  IdHTTP1.Request.UserAgent := 'Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0; .NET CLR 2.0.50727)';
  idHTTP1.Get('http://www.baidu.com/s?wd=xtty');
  ShowMessage(idHTTP1.URL.Params);
  ShowMessage(idHTTP1.URL.Document);

  Cookies := IdCookieManager1.CookieCollection;
  for i := 0 to cookies.Count - 1 do
    Memo1.Lines.Add(Cookies.Items[i].CookieName + 'Value：' + Cookies.Items[i].Value);
end;

 

相关阅读 >>

Delphi 中 findwindow 和 findwindowex 的语法和用法

Delphi tstream 详细介绍

Delphi 圆角panel

Delphi 如何比较两个二维数组是否相等

Delphi文件操作所涉及的一些函数 附例子

Delphi驱动结束进程

Delphi xe 版本 示例原码下载

Delphi获取网卡mac地址

Delphi 逐个分解后字符串加载到stringgrid1

Delphi getvolumeinformation获取硬盘分区信息

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

转载请注明出处：木庄网络博客 » Delphi下idHTTP配合CookieManager获取Cookie