TCellObj

type TCellObj = class(TCellObjBase)

protected

  function GetCell; override;

  procedure Draw(); override;

  procedure DrawLogic2(); override;

public

  NeedDoImageStuff: Boolean;

  BGImage: TImageObj;

  TiledImage: ThtImage;

  MargArray: ThtMarginArray;

  MargArrayO: ThtVMarginArray;

  NoMask: Boolean;

  BreakBefore: Boolean;

  BreakAfter: Boolean;

  KeepIntact: Boolean;

  constructor Create();

  constructor CreateCopy();

  destructor Destroy; override;

  function Clone(); override;

  procedure AssignTo(); override;

  property Border: TRect; [rw]

  property BrdBottom: Integer; [rw]

  property BrdLeft: Integer; [rw]

  property BrdRight: Integer; [rw]

  property BrdTop: Integer; [rw]

  property Cell: TCellObjCell; [r]

  property EmSize: Integer; [rw]

  property ExSize: Integer; [rw]

  property HasBorderStyle: Boolean; [rw]

  property Ht: Integer; [r]

  property Padding: TRect; [rw]

  property PadBottom: Integer; [rw]

  property PadLeft: Integer; [rw]

  property PadRight: Integer; [rw]

  property PadTop: Integer; [rw]

  property PRec: PtPositionRec; [rw]

  property ShowEmptyCells: Boolean; [rw]

  property HideOverflow: Boolean; [rw]

  property VAlign: ThtAlignmentStyle; [rw]

  property VSize: Integer; [rw]

  property Wd: Integer; [rw]

  property YIndent: Integer; [rw]

end;

TCellObj

TCellObjBase

TObject