PDA

Просмотр полной версии : Веб сервер на Delphi

mak
01.08.2024, 18:38
Привет,

Мало кто знает, что Delphi (да-да, ту самую Borland Delphi, даже старую версию Delphi 6 или Delphi 7, в которой перетягиваешь кнопочки на форму), можно использовать для создания веб сервера.

Например напишем простейший веб-сервер:


program WebApp;
{$APPTYPE CONSOLE}

uses
IdHTTPServer,
IdTCPServer,
IdCustomHTTPServer,
IdContext;

Type
TCommandHandler= class
protected
procedure DoCommandGet(AThread: TIdContext;
ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);

end;

{$R *.res}
var Server:TIdHTTPServer ;
CH:TCommandHandler;


procedure TCommandHandler.DoCommandGet(AThread: TIdContext;
ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);
begin
AResponseInfo.ContentText := '<html><head><title>Delphi WebApp</title></head><body><h1>It works!</h1><hr><p>Hello, world!</p></body></html>';
AResponseInfo.ContentType := 'text/plain';
end;

begin
Server := TIdHTTPServer.Create(nil);
CH := TCommandHandler.Create;
Server.OnCommandGet := CH.DoCommandGet;
Server.DefaultPort := 80;
Server.Active := True;
Readln;
end.

А обработчики уже придумаете по ходу дела. Если кому интересно, могу развивать эту тему ;)
prow3r05
06.08.2024, 02:13
Знаю о таком :D
Помню один раз делал DLL-ку внутри которой был HTML, и она подгружалась через iis, и все это дело конечно же работало)))
danil
31.08.2024, 18:11
Использую XAMPP и Laragon на Windows ПК. У XAMPP есть много старых версий, со старыми версиями Apache, PHP и MySQL. Ставится быстро, использовать интуитивно понятно. На VPS всегда пользовался ISPManager для управления сервером и не парился.

P.S. Я просто люблю идти по пути наименьшего сопративления к своей цели, созданию и тестированию web-страниц, но кому то может быть важно создать нестандартный софт для web-сервера, например если создаешь сервис.
alojz
01.12.2024, 08:52
Если кому интересно, могу развивать эту тему ;)
Да. Тема интересная (была для меня вначале столетия). В те времена интернет стоил очень дорого. Мне встретилась программа где можно было выуживать данные телефонных карт и выходить в сеть. Так вот в виде исходного кода приложенного, был и http-сервер. В дальнейшем я переделал его. Точнее говоря сделал для него интерфейс : кнопки выбора директории, установка ip-адреса, еще кое-чего. Одним словом если нужен могу выложить, хотя я его уже выкладывал на сайте олд-дос в программах под Windows называется тема Http-Сервер - так кажется.