Добавить комментарий

Delphi

Работа с куками

Получить куки:

uses
...
      IdCookieManager
      IdCookie
    ;
...
var
  FCookieManager : TIdCookieManager;
  idHTTP:TidHTTP;
...
begin
  FCookieManager := TIdCookieManager.Create;
  idHTTP:=TidHTTP.Create;
  try
    idHTTP.CookieManager := FCookieManager;
    idHTTP.AllowCookies:=True;
...

Добавить куки к запросу:

var
  s: string;
begin
    s := 'Cookie:';
    for I := 0 to FCookieManager.CookieCollection.Count -1 do
    begin
      s := s + ' ' + FCookieManager.CookieCollection.Cookies[i].CookieText+';';
    end;
    idHTTP.Request.CustomHeaders.Text := s;
  
Метки:

Filtered HTML

  • Адреса страниц и электронной почты автоматически преобразуются в ссылки.
  • Допустимые HTML-теги: <a> <em> <strong> <cite> <blockquote> <code> <ul> <ol> <li> <dl> <dt> <dd>
  • Строки и абзацы переносятся автоматически.
  • Вы можете цитировать другие сообщения, используя тэг [quote]

Plain text

  • HTML-теги не обрабатываются и показываются как обычный текст
  • Адреса страниц и электронной почты автоматически преобразуются в ссылки.
  • Строки и абзацы переносятся автоматически.