Class TPanelBorder (unit AdvancedPanel)

Inherits from

TPersistent

Constructors


constructor Create;

- TPanelBorder ---------------------------------------------------------------


Functions

procedure Assign(Source: TPersistent);


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


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


procedure SetSides(Value: TPanelSides);


procedure SetStyle(Value: TPanelBorderStyle);


Properties

property Sides : TPanelSides


property Style : TPanelBorderStyle


Events

event OnChange : TNotifyEvent


Variables

FOnChange : TNotifyEvent;


FSides : TPanelSides;


FStyle : TPanelBorderStyle;



Constructors


constructor Create;

- TPanelBorder ---------------------------------------------------------------


Functions


procedure Assign(Source: TPersistent);


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


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


procedure SetSides(Value: TPanelSides);


procedure SetStyle(Value: TPanelBorderStyle);


Properties


property Sides : TPanelSides


property Style : TPanelBorderStyle


Events


event OnChange : TNotifyEvent


Variables


FOnChange : TNotifyEvent;


FSides : TPanelSides;


FStyle : TPanelBorderStyle;