[Overview][Constants][Types][Classes][Procedures and functions][Index] | Reference for unit 'ExtCtrls' (#lcl)

# TBevel

[Properties (by Name)] [Methods (by Name)] [Events (by Name)]

A bevel placed around the edge of buttons and other components

## Declaration

Source position: extctrls.pp line 826

`type TBevel = class(TGraphicControl)`
``
`class procedure WSRegisterClass; override;` |  | WSRegisterClass - Register this Class for the current Widget Set
`class function GetControlClassDefaultSize; override;`
`protected`
`procedure Paint; override;` |  | Virtual Paint method called in response to paint requests.
`public`
`constructor Create(); override;` |  | Create - constructor for TBevel: calls inherited Create then sets initial style, shape and bounds
`destructor Destroy; override;` |  | Destroy - destructor for TGraphicControl: frees local canvas and performs inherited Destroy
`procedure Assign(); override;`
`published`
`property Align;` |  | Used to align the control to the top, bottom, left or right of its client.
`property Anchors;` |  | The set of anchor definitions for this control
`property BorderSpacing;` |  | Determines the border spacing for this control
`property Constraints;` |  | Determine Constraints (max and min height and width) for this control
`property ParentShowHint;`
`property Shape: TBevelShape; [rw]` |  | Shape - whether a box, a frame or a line along one of the edges
`property ShowHint;`
`property Style: TBevelStyle; [rw]` |  | Style - whether raised or lowered
`property Visible;` |  | Visible - can the control be seen?
`property OnChangeBounds;` |  | Event handler for a change in bounds of the control
`property OnResize;` |  | Event Handler for resize of control
`property OnMouseDown;` |  | Event handler for when a mouse button is pressed down
`property OnMouseMove;` |  | Event handler for mouse movement within the current control
`property OnMouseUp;` |  | Event handler for when the mouse button is released, ie "up"
`property OnPaint;` |  | OnPaint - event handler for request to paint canvas
`end;`

## Inheritance

`TBevel` |  | A bevel placed around the edge of buttons and other components
`TGraphicControl` |  | TGraphicControl is the base class for all lightweight controls.
`TControl`
`TLCLComponent` |  | TLCLComponent - base class for LCL components
`TComponent,IUnknown,IInterfaceComponentReference`
`TPersistent`
`TObject`

## Description

TBevel - a bevel placed around the edge of buttons and other components.

Its appearance is governed by TBevelShape, TBevelStyle and TBevelwidth

The latest version of this document can be found at lazarus-ccr.sourceforge.net .