Я использую компонент TWebModule для написания приложения веб-сервера с Delphi. Нажав на свойство Actions в TWebModule, можно определить новое действие и создать обработчик событий OnAction. Например:Являются ли параметры обработчиков событий TWebModule глобальными?
procedure TMainWeb.MyAction(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
Response.Content := '<html><body>myvariable: '+request.queryfields.values['myvariable']+</body></html>';
end;
я заметил, не parametered процедуры могут быть вызваны, которые имеют доступ к TWebModule просьбе, ответ, и обработали параметров. Например, я успешно использовал следующий вместо явного созданных обработчиков действий:
procedure TMainWeb.WebModuleBeforeDispatch(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
if Pos('myaction.html',request.url)>0 then
DoMyAction;
end;
procedure TMainWeb.DoMyAction;
begin
Response.Content := '<html><body>myvariable: '+request.queryfields.values['myvariable']+</body></html>';
end;
Может ли я быть всегда уверены, ссылки на отправитель, запрос, ответ, и обрабатывался я делаю в DoMyAction является «правильными» из них?
Если вы делаете этот путь, будьте уверены, что всегда реакция обрабатывается как истина. –