TTableBlock

type TTableBlock = class(TBlock)

protected

  function GetBorderWidth; override;

public

  Table: THtmlTable;

  WidthAttr: Integer;

  AsPercent: Boolean;

  BkColor: TColor;

  BkGnd: Boolean;

  HSpace: Integer;

  VSpace: Integer;

  HasCaption: Boolean;

  TableBorder: Boolean;

  Justify: ThtJustify;

  TableIndent: Integer;

  constructor Create();

  constructor CreateCopy(); override;

  function DrawLogic1(); override;

  function Draw1(); override;

  procedure MinMaxWidth(); override;

  function FindWidth(); override;

  function FindWidth1();

  procedure AddSectionsToList; override;

end;

TTableBlock

TBlock

TBlockBase

TSectionBase

THtmlNode

TIDObject

TObject