TWebHandler

type TWebHandler = class(TComponent)

protected

  class procedure DoError();

  procedure Terminate; virtual;

  function GetModuleName();

  function WaitForRequest(); virtual; abstract;

  procedure EndRequest(); virtual;

  function FindModule();

  procedure SetBaseURL(); virtual;

  function GetApplicationURL(); virtual;

  procedure ShowRequestException(); virtual;

  procedure InitRequest(); virtual;

  procedure InitResponse(); virtual;

  function GetEmail; virtual;

  function GetAdministrator; virtual;

  property Terminated: Boolean; [r]

public

  constructor Create(); override;

  destructor Destroy; override;

  procedure Run; virtual;

  procedure Log();

  procedure DoHandleRequest();

  procedure HandleRequest(); virtual;

  property HandleGetOnPost: Boolean; [rw]

  property RedirectOnError: Boolean; [rw]

  property RedirectOnErrorURL: string; [rw]

  property ApplicationURL: string; [rw]

  property AllowDefaultModule: Boolean; [rw]

  property DefaultModuleName: string; [rw]

  property ModuleVariable: string; [rw]

  property OnGetModule: TGetModuleEvent; [rw]

  property Email: string; [rw]

  property Title: string; [rw]

  property Administrator: string; [rw]

  property OnShowRequestException: TOnShowRequestException; [rw]

  property OnIdle: TNotifyEvent; [rw]

  property OnLog: TLogEvent; [rw]

  property OnUnknownRequestEncoding: TOnUnknownEncodingEvent; [rw]

  property OnInitModule: TInitModuleEvent; [rw]

  property PreferModuleName: Boolean; [rw]

  property LegacyRouting: Boolean; [rw]

end;

TWebHandler

TObject