mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-30 03:02:37 +02:00
16 lines
251 B
ObjectPascal
16 lines
251 B
ObjectPascal
program restserver;
|
|
|
|
{$mode objfpc}{$H+}
|
|
|
|
uses
|
|
fphttpapp, dmRestBridge;
|
|
|
|
begin
|
|
Application.CreateForm(TRestDataModule,RestDataModule);
|
|
Application.Title:='restserver';
|
|
Application.Port:=8080;
|
|
Application.Initialize;
|
|
Application.Run;
|
|
end.
|
|
|