"AND" "OR"
Главная Информер Журнал Форум

Добавляем Cookies.

Автор: Jon Lee

Пример демонстрирует создание cookie посредствам стандартного компонента Delphi

Совместимость: Все версии Delphi

  Пример:

procedure TwebDispatcher.WebAction(Sender: TObject; Request: TWebRequest;
  Response: TWebResponse; var Handled: Boolean);
begin
    with (Response.Cookies.Add) do begin
      Name := 'TESTNAME';
      Value := 'TESTVALUE';
      Secure := False;
      Expires := Now;
      Response.Cookies.WebResponse.SendResponse;
    end;
end;