Class TPaintPanel (unit WABD_Objects)

Inherits from

TPanel

************************************************************************ Misc. Helper objects

Constructors



Functions

procedure Paint;

************************************************************************ TPaintPanel

procedure SetCellBorder(nb: integer);


procedure SetDesignMode(nm: boolean);


procedure SetDrawPic(b: boolean);

To line up with everyone else

Properties

property CellBorder : integer


property DesignMode : boolean


property DrawPic : boolean


Events

Variables

GridX : integer;


GridY : integer;


Pic : TImage;


FCellBord : integer;


FDMode : boolean;


FDrawPic : boolean;


FFormSec : TWABD_FormSection_Base;



Constructors


Functions


procedure Paint;

************************************************************************ TPaintPanel


procedure SetCellBorder(nb: integer);


procedure SetDesignMode(nm: boolean);


procedure SetDrawPic(b: boolean);

To line up with everyone else


Properties


property CellBorder : integer


property DesignMode : boolean


property DrawPic : boolean


Events


Variables


GridX : integer;


GridY : integer;


Pic : TImage;


FCellBord : integer;


FDMode : boolean;


FDrawPic : boolean;


FFormSec : TWABD_FormSection_Base;