T_Section

type T_Section = class(TObject)

public

  constructor Create(); virtual;

  destructor Destroy; override;

  procedure LoadPage();

  procedure LoadCmdHeader;

  procedure LoadCmdPage;

  procedure LoadCmdFooter;

  procedure LoadCmdGroup;

  procedure LoadCmdGroupToPage;

  procedure LoadSpaceHeader();

  procedure LoadSpacePage();

  procedure LoadSpaceFooter();

  procedure LoadSpaceGroup();

  procedure LoadFrame();

  procedure LoadLine();

  procedure LoadLineHorizHeader();

  procedure LoadLineHorizPage();

  procedure LoadLineHorizFooter();

  procedure LoadLineHorizGroupe();

  procedure LoadSurf();

  procedure LoadImgHeader();

  procedure LoadImgPage();

  procedure LoadImgFooter();

  function GetCmdPage();

  property CmdHeader: TList; [r]

  property CmdFooter: TList; [r]

  property NbPages: Integer; [r]

  property FirstPage: Integer; [r]

  property Pages: TList; [r]

  property TotPages: Integer; [r]

  property Paper: TPaper; [r]

  property Margins: TDimensions; [r]

  property CmdFrames: TList; [r]

  property DefaultCol: Integer; [rw]

  property Title: string; [rw]

end;

T_Section

TObject