webdemo.pp 283 B

12345678910111213141516
  1. program webdemo;
  2. {$mode objfpc}{$H+}
  3. uses
  4. fphttpapp, regreports, wmreports;
  5. begin
  6. Application.Port:=8080;
  7. Application.AllowDefaultModule:=True;
  8. Application.DefaultModuleName:='Page';
  9. Application.PreferModuleName:=True;
  10. Application.Initialize;
  11. Application.Run;
  12. end.