/packages/fcl-web/examples/fptemplate/fileupload/apache/fileupload.lpr
https://github.com/slibre/freepascal · Unknown · 37 lines · 26 code · 11 blank · 0 comment · 0 complexity · 7eb1c95f1d83a72f30eead072b4bfc60 MD5 · raw file
- Library fileupload;
- {$mode objfpc}{$H+}
- Uses
- {$ifdef unix}
- cthreads,
- {$endif}
- httpd,fpApache, webmodule;
- Const
- { The following constant is used to export the module record. It must
- always match the name in the LoadModule statement in the apache
- configuration file(s). It is case sensitive !}
- ModuleName='mod_fileupload';
- { The following constant is used to determine whether the module will
- handle a request. It should match the name in the SetHandler statement
- in the apache configuration file(s). It is not case sensitive. }
- HandlerName=ModuleName;
- Var
- DefaultModule : module; {$ifdef unix} public name ModuleName;{$endif unix}
- Exports defaultmodule name ModuleName;
- {$R *.res}
- begin
- Application.ModuleName:=ModuleName;
- Application.HandlerName:=HandlerName;
- Application.SetModuleRecord(DefaultModule);
- Application.Initialize;
- end.