Class TPanelBevel (unit AdvancedPanel)

Inherits from

TPersistent

Constructors


constructor Create;

- TPanelBevel ----------------------------------------------------------------


Functions

procedure Assign(Source: TPersistent);


procedure InflateRect(var Rect: TRect; RectSides: TPanelSides);


procedure Paint(Canvas: TCanvas; Rect: TRect; RectSides: TPanelSides);


procedure SetDepth(Value: TPanelBevelDepth);


procedure SetSides(Value: TPanelSides);


procedure SetSpaceInner(Value: TPanelBevelSpace);


procedure SetSpaceOuter(Value: TPanelBevelSpace);


procedure SetStyle(Value: TPanelBevelStyle);


Properties

property Depth : TPanelBevelDepth


property Sides : TPanelSides


property SpaceInner : TPanelBevelSpace


property SpaceOuter : TPanelBevelSpace


property Style : TPanelBevelStyle


Events

event OnChange : TNotifyEvent


Variables

FDepth : TPanelBevelDepth;


FOnChange : TNotifyEvent;


FSides : TPanelSides;


FSpaceInner : TPanelBevelSpace;


FSpaceOuter : TPanelBevelSpace;


FStyle : TPanelBevelStyle;



Constructors


constructor Create;

- TPanelBevel ----------------------------------------------------------------


Functions


procedure Assign(Source: TPersistent);


procedure InflateRect(var Rect: TRect; RectSides: TPanelSides);


procedure Paint(Canvas: TCanvas; Rect: TRect; RectSides: TPanelSides);


procedure SetDepth(Value: TPanelBevelDepth);


procedure SetSides(Value: TPanelSides);


procedure SetSpaceInner(Value: TPanelBevelSpace);


procedure SetSpaceOuter(Value: TPanelBevelSpace);


procedure SetStyle(Value: TPanelBevelStyle);


Properties


property Depth : TPanelBevelDepth


property Sides : TPanelSides


property SpaceInner : TPanelBevelSpace


property SpaceOuter : TPanelBevelSpace


property Style : TPanelBevelStyle


Events


event OnChange : TNotifyEvent


Variables


FDepth : TPanelBevelDepth;


FOnChange : TNotifyEvent;


FSides : TPanelSides;


FSpaceInner : TPanelBevelSpace;


FSpaceOuter : TPanelBevelSpace;


FStyle : TPanelBevelStyle;