куки

//объявлена в модуле с браузером
procedure TfHWMBrowser.SetCookies(Cookies: TIdCookieManager);
var
  fCookies: TIdCookieList;
  i: Integer;
begin
  fCookies := Cookies.CookieCollection.LockCookieList(caRead);
  try
    for i := 0 to Pred(fCookies.Count) do
      with fCookies[i] do
        HWMCookieManager.SetCookie('http://www.heroeswm.ru/*', CookieName, Value, Domain,
          Path, Secure, HttpOnly, IsExpired, CreatedAt, LastAccessed, Expires, nil);
  finally
    Cookies.CookieCollection.UnlockCookieList(caRead);
  end;
end;