SetCookies

Записывает массив кук в хранилище, в соответствии с указанными параметрами. Все куки, соответствующие указанным параметрам при этом предварительно удаляются из хранилища.

procedure TStorage.SetCookies(aCookies: array of TCookie; aProfileName: String; aSurferID: Integer; aUserID: Integer; aUAID: Integer);

TStorage.setCookies(aCookies, aProfileName, aSurferID, aUserID, aUAID);

1. //{$MODE PASCAL}
   var store1 := TStorage.Create('http://localhost/wastorage/wastorage.php', 'pass');
   var cookies := store1.GetCookies('testprofile', 1, 1, 1);
   var store2 := TStorage.Create('http://localhost/wastorage/wastorage.php', 'pass');
   var cookies2: array of TCookie;
   cookies2.add(cookies[cookies.Count - 1]);
   store2.SetCookies(cookies2, 'secondprofile', 1, 2, 3);

1. //{$MODE PASCAL}
   TABS[0].Load('ya.ru');
   var store := TStorage.Create('http://localhost/wastorage/wastorage.php', 'pass');
   var cookies := SESSION.GetCookies();
   store.SetCookies(cookies, 'testprofile', 1, 2, 3);

1. //{$MODE ECMA}
   var store1 = new TStorage('http://localhost/wastorage/wastorage.php', 'pass');
   var store2 = new TStorage('http://localhost/wastorage/wastorage.php', 'pass');
   var cookies2 = [];
   var cookies = store1.getCookies('testprofile', 1, 2, 3);
   store2.setCookies(cookies, 'secondprofile', 1, 10, 100);

1. //{$MODE ECMA}
   TABS[0].load('ya.ru');
   var store = new TStorage('http://localhost/wastorage/wastorage.php', 'pass');
   var cookies = SESSION.getCookies();
   store.setCookies(cookies, 'testprofile', 1, 2, 3);