ModuleFactory¶

var
  ModuleFactory: type

  TModuleFactory = class(TCollection)
  public
    procedure RegisterHTTPModule(const ModuleName: string; 
                            ModuleClass: TCustomHTTPModuleClass; 
                            SkipStreaming: Boolean=False);  virtual;
    procedure RegisterHTTPModule(ModuleClass: TCustomHTTPModuleClass; 
                            SkipStreaming: Boolean=False);
    function FindModule(const AModuleName: string) : TModuleItem;
    function ModuleByName(const AModuleName: string) : TModuleItem;
    function IndexOfModule(const AModuleName: string) : Integer;
    procedure RemoveModule(const AModuleName: string);
    function MoveModuleBeforeDefault(const AModuleName: string) : Boolean;
    property Modules[Index : Integer]: TModuleItem read GetModule write SetModule; default;
    property OnModuleRequest: TOnModuleRequest read FOnModuleRequest write FOnModuleRequest;
  end;