THTMLContentProducer

type THTMLContentProducer = class(THTTPContentProducer,IHTMLContentProducerContainer)

protected

  function CreateWriter(); virtual;

  function GetIdentification; virtual;

  function GetIDSuffix; virtual;

  procedure SetIDSuffix(); virtual;

  FAcceptChildsAtDesignTime: Boolean;

  procedure SetParentComponent(); override;

  procedure GetChildren(); override;

  procedure DoBeforeGenerateContent();

  function GetEvents; virtual;

  procedure AddEvent(); virtual;

  procedure DoOnEventCS(); virtual;

  procedure SetupEvents(); virtual;

  function GetWebPage;

  function GetWebController();

  property ContentProducerList: TFPList; [r]

public

  procedure BeforeGenerateContent; virtual;

  function WriteContent(); virtual;

  function ProduceContent; override;

  function GetParentComponent; override;

  property ParentElement: THTMLCustomElement; [rw]

  property Writer: THTMLWriter; [rw]

  property HTMLDocument: THTMLDocument; [rw]

  property IDSuffix: string; [rw]

  constructor Create(); override;

  destructor destroy; override;

  function HasParent; override;

  function ChildCount;

  procedure CleanupAfterRequest; virtual;

  procedure AddContentProducer();

  procedure RemoveContentProducer();

  function ExchangeContentProducers();

  function MoveContentProducer();

  procedure HandleAjaxRequest(); virtual;

  procedure ForeachContentProducer();

  property Identification: string; [r]

  property Childs []: THTMLContentProducer; [r]

  property AcceptChildsAtDesignTime: Boolean; [r]

  property parent: TComponent; [rw]

end;

THTMLContentProducer

THTTPContentProducer,IHTMLContentProducerContainer

TObject