Class TPolygons (unit Poly)

Inherits from

TGraphicControl

Constructors


constructor Create(AOwner: TComponent);



Functions

procedure draw;


procedure paint;


procedure FixIt;


function get_pen: TPen;


procedure set_AngleStep(_AngleStep: integer);


procedure set_AutoPolyCount(b: boolean);


procedure set_HeightChange(h: integer);


procedure set_pen(p: TPen);


procedure set_PolyCount(c: integer);


procedure set_StartAngle(_StartAngle: integer);


procedure set_StartAngleChange(s: integer);


procedure set_StartPolyCount(c: integer);


procedure set_Trans(b: boolean);


procedure set_WidthChange(w: integer);


procedure set_WidthHeightChange(b:boolean);


Properties

property Align :


property AngleStep : integer


property AutoPolyCount : boolean


property Color :


property enabled :


property HeightChange : integer


property ParentColor :


property Pen : TPen


property PolyCount : integer


property ShowHint :


property StartAngle : integer


property StartAngleChange : integer


property StartPolyCount : integer


property Transparent : boolean


property Visible :


property WidthChange : integer


property WidthHeightChange : boolean


Events

Variables

locx : integer;


locy : integer;


rx : integer;


ry : integer;


Trans : boolean;


_AutoPolyCount : boolean;


_HeightChange : integer;


_PolyCount : integer;


_StartAngleChange : integer;


_StartPolyCount : integer;


_WidthChange : integer;


_WidthHeightChange : boolean;


__AngleStep : integer;


__StartAngle : integer;



Constructors


constructor Create(AOwner: TComponent);


Functions


procedure draw;


procedure paint;


procedure FixIt;


function get_pen: TPen;


procedure set_AngleStep(_AngleStep: integer);


procedure set_AutoPolyCount(b: boolean);


procedure set_HeightChange(h: integer);


procedure set_pen(p: TPen);


procedure set_PolyCount(c: integer);


procedure set_StartAngle(_StartAngle: integer);


procedure set_StartAngleChange(s: integer);


procedure set_StartPolyCount(c: integer);


procedure set_Trans(b: boolean);


procedure set_WidthChange(w: integer);


procedure set_WidthHeightChange(b:boolean);


Properties


property Align :


property AngleStep : integer


property AutoPolyCount : boolean


property Color :


property enabled :


property HeightChange : integer


property ParentColor :


property Pen : TPen


property PolyCount : integer


property ShowHint :


property StartAngle : integer


property StartAngleChange : integer


property StartPolyCount : integer


property Transparent : boolean


property Visible :


property WidthChange : integer


property WidthHeightChange : boolean


Events


Variables


locx : integer;


locy : integer;


rx : integer;


ry : integer;


Trans : boolean;


_AutoPolyCount : boolean;


_HeightChange : integer;


_PolyCount : integer;


_StartAngleChange : integer;


_StartPolyCount : integer;


_WidthChange : integer;


_WidthHeightChange : boolean;


__AngleStep : integer;


__StartAngle : integer;