Unit Gpshape

Classes

THackCanvas - 25%
TManyShape -

Functions

Register -

Types

TFillDirection
TGPShapeType
TShadowFill
TShadowOrient
TSurfaceType

Constants

HatchBits25
HatchBits50
MAXVECTORS

Variables


Functions


procedure Register;


Types


TFillDirection = (gdUp, gdDown, gdLeft, gdRight);

TGPShapeType = (gstRectangle, gstSquare, gstRoundRect, gstRoundSquare,
                  gstEllipse, gstCircle,
                  gstDiamond, gstStar,gstPolyGon,
                  gstTriangleLeft,gstTriangleRight,gstTriangleUp,gstTriangleDown);

TShadowFill = (sfSolid,sf25Percent,sf50Percent);

TShadowOrient = (soNone,soLowerRight,soUpperRight,soUpperLeft,soLowerLeft);

TSurfaceType = (stBrushTransparent,stBrushOpaque,stBrushImage,stGradientFill,stBrush50PercentOpaque,stBrush25PercentOpaque);

Constants

HatchBits25 = ($AA, $0,$AA, $0,$AA, $0,$AA, $0)

50%

HatchBits50 = ($AA, $55,$AA, $55,$AA, $55,$AA, $55)

MAXVECTORS = 100


Variables