TWebPage

type TWebPage = class(TDataModule,IHTMLContentProducerContainer,IHTMLDesignable)

protected

  procedure DoAfterAjaxRequest(); virtual;

  procedure DoHandleAjaxRequest(); virtual;

  procedure DoBeforeRequest(); virtual;

  procedure DoBeforeShowPage(); virtual;

  procedure DoCleanupAfterRequest();

  procedure SetRequest(); virtual;

  procedure GetChildren(); override;

  property ContentProducerList: TFPList; [r]

public

  destructor Destroy; override;

  function ContentProducerCount;

  function ProduceContent;

  procedure AddContentProducer();

  procedure RemoveContentProducer();

  function ExchangeContentProducers();

  function MoveContentProducer();

  procedure ForeachContentProducer();

  function IsAjaxCall; virtual;

  procedure HandlePage(); virtual;

  procedure DoBeforeGenerateXML; virtual;

  procedure CleanupAfterRequest; virtual;

  property Designer: IWebPageDesigner; [rw]

  property Request: TRequest; [r]

  property ContentProducers []: THTMLContentProducer; [r]

  property HasWebController: Boolean; [r]

  property WebController: TWebController; [rw]

  property WebModule: TFPWebModule; [r]

published

  property BeforeRequest: TRequestEvent; [rw]

  property BeforeShowPage: TRequestEvent; [rw]

  property AfterAjaxRequest: TAjaxRequestResponseEvent; [rw]

  property OnAjaxRequest: THandleAjaxRequest; [rw]

  property BaseURL: string; [rw]

end;

TWebPage

TObject,IHTMLContentProducerContainer,IHTMLDesignable