- Код: Выделить всё
program webserver;
{$mode objfpc}{$H+}
uses
{$ifdef UNIX}
cthreads, cmem,
{$endif}
fphttpapp, httpdefs, httproute;
procedure route1(aReq: TRequest; aResp: TResponse);
begin
aResp.content:='<html><body><h1>Route 1 The Default</h1></body></html>'
end;
procedure route2(aReq: TRequest; aResp: TResponse);
begin
aResp.content:='<html><body><h1>Route 2</h1></body></html>'
end;
begin
HTTPRouter.registerRoute('/', @route1, true);
HTTPRouter.registerRoute('/route2', @route2);
Application.port := 8080;
Application.threaded := true;
Application.initialize;
Application.run;
end.
В процессе экспериментов никаких особых проблем не заметил, поэтому прошу совета у тех, кто ее использовал: есть ли какие-то подводные камни при использовании этой технологии в промышленной эксплуатации? Есть ли что-то, на что нужно обратить особое внимание? И вообще - стоит ли запускать в пром такой сервер, не имеет ли смысл использовать что-то другое (например, Indy). В общем, буду рад любым советам. Заранее спасибо
Другое дело, что я никогда не писал веб-приложений, и сейчас разбираюсь с тонкостями именно этого направления. К вам никоим образом никаких претензий, просто чтобы ни вы ни я не теряли время на обсуждение обработки событий типа OnClose или OnCloseQuery
Правда хочу сказать, что держать консольное окно только ради Web-сервера, которому такое окно ни разу не нужно - это несколько странно.