tralala.pp 412 B

12345678910111213141516171819202122232425262728
  1. unit tralala;
  2. {$mode objfpc}{$H+}
  3. interface
  4. uses
  5. Classes, SysUtils, FileUtil, LResources, HTTPDefs, websession, fpHTTP, fpWeb;
  6. type
  7. TFPWebModule1 = class(TFPWebModule)
  8. private
  9. { private declarations }
  10. public
  11. { public declarations }
  12. end;
  13. var
  14. FPWebModule1: TFPWebModule1;
  15. implementation
  16. initialization
  17. {$I tralala.lrs}
  18. RegisterHTTPModule('TFPWebModule1', TFPWebModule1);
  19. end.