THTMLDatasetFormProducer

type THTMLDatasetFormProducer = class(THTMLContentProducer)

protected

  procedure FillTableDef(); virtual;

  procedure PlaceFieldValue(); virtual;

  procedure ControlToTableDef(); virtual; abstract;

  function StartForm(); virtual;

  procedure EndForm(); virtual;

  property TableDef: TTableDef; [r]

  function SingleRecord; dynamic;

  property RecordsPerPage: Integer; [rw]

  property Page: Integer; [rw]

  property IncludeHeader: Boolean; [rw]

public

  constructor create(); override;

  destructor destroy; override;

  function WriteContent(); override;

published

  property FormAction: string; [rw]

  property FormMethod: TFormMethod; [rw]

  property DataSource: TDataSource; [rw]

  property Controls: TFormFieldCollection; [rw]

  property SeparateLabel: Boolean; [rw]

  property buttonrow: TFormButtonCollection; [rw]

  property TableCols: Integer; [rw]

  property TableRows: Integer; [rw]

  property ButtonsHorizontal: TButtonHorPosition; [rw]

  property ButtonsVertical: TButtonVerPositionSet; [rw]

  property OnInitializeProducer: TProducerEvent; [rw]

  property AfterCellCreate: TFieldCellEvent; [rw]

  property AfterButtonCreate: TButtonEvent; [rw]

  property AfterTableCreate: THTMLElementEvent; [rw]

  property AfterTBodyCreate: THTMLElementEvent; [rw]

  property AfterSetRecord: TProducerSetRecordEvent; [rw]

  property OnFieldChecked: TFieldCheckEvent; [rw]

end;

THTMLDatasetFormProducer

THTMLContentProducer

THTTPContentProducer,IHTMLContentProducerContainer

TObject