HTTP сервер

[Serg]

1. Пишу

 

procedure TUniServerModule.UniGUIServerModuleHTTPCommand(

  ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo;

  var Handled: Boolean);

begin

   if  (Pos('/qwe',ARequestInfo.Document)>0) then

   AResponseInfo.ContentText:='qwe';

end;

 

2.Запускаю

 

3.Вызываю 

 

http://localhost:8077/qwe

 

4.Получаю Invalid session or session Timeout. 

 

Вопрос: В чем ошибка?

 

[Sherzod]

Добрый день,

 

Вы должны установить Handled := True

[Serg]

Спасибо

[Serg]

Спасибо!