Пример демонстрирует создание 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;
Автор:
Jon Lee
Источник: http://www.sources.ru/delphi/
|
Copyright ©
"Мастера DELPHI" E-mail:
delphi@mastak.com
http://www.delphimaster.ru |
Источник получения информации: http://www.delphimaster.ru
|