以下是使用步骤的演示代码:
1、WebBrowswer 控件打开网址后,获取其 Cookie 值:
CookieStr := 'Cookie: ' + (Web.document as IHtmlDocument2).cookie;
2、将 Cookie 值传给 idhttp 控件使用:
if CookieStr <> '' then IdHTTP1.Request.CustomHeaders.Text := CookieStr;