SetCookies

Устанавливает указанные куки в профиль.

Синтаксис

procedure SetCookies(aURL: string; aCookies: TCSCookies);

Параметры

  • aURL
    • тип: string
    • назначение: страница, от имени которой происходит запись
  • aCookies
    • тип: TCSCookies
    • назначение: массив кук для записи в профиль

Примеры

  1. var cookies: TCSCookies;
    var cookie: TCSCookie;
    cookie.name := 'testcookie';
    cookie.value := 'testvalue';
    cookie.domain := 'mysite.ru';
    cookie.path := '/';
    cookie.securre := false;
    cookie.hasExpires := false;
    cookie.creation := UTCDateTime;
    cookie.lastAccess := UTCDateTime;
    cookie.expires := 0;
    cookies.Add(cookie);
    SetCookies('http://mysite.com/', cookies);