[Overview][Types][Classes][Procedures and functions][Index] |
[Properties (by Name)] [Methods (by Name)] [Events (by Name)]
TShape draws an arbitrary geometric shape.
Source position: extctrls.pp line 269
type TShape = class(TGraphicControl) |
||
protected |
||
class procedure WSRegisterClass; override; |
|
Registers this component class with the current WidgetSet. |
class function GetControlClassDefaultSize; override; |
|
Gets the default size for instances of the control. |
public |
||
constructor Create(); override; |
|
Create - constructor for TShape: calls inherited Create, sets default styles and bounds, creates pen and brush. |
destructor Destroy; override; |
|
Destroy - destructor for TShape: frees pen and brush, then calls inherited Destroy. |
procedure Paint; override; |
|
Draws the shape for the control on its Canvas. |
procedure StyleChanged(); |
|
StyleChanged - method for handling change of style by Sender. |
published |
||
|
Specifies the placement of the control inside its Parent. |
|
|
The set of anchor definitions for this control. |
|
property BorderSpacing: TControlBorderSpacing; |
|
Determines the inner and outer border spacing for this control. |
|
The Brush to be used for coloring this shape. |
|
property Constraints: TSizeConstraints; |
|
The minimum and maximum Width and Height for the control. |
property DragCursor: TCursor; |
|
The cursor shape shown while the control is dragged. |
|
The operation when the control is dragged - Drag or Dock. |
|
|
Allows the user to drag the control. |
|
property Enabled: Boolean; |
|
Determines whether the control reacts on mouse or keyboard input. |
property ParentShowHint: Boolean; |
|
If true, the value of ShowHint for the control will be the same as the one from the Parent. Default is true. |
|
The Pen to be used for drawing this shape. |
|
property OnChangeBounds: TNotifyEvent; |
|
Event handler for a change of the Bounds of the control. |
property OnDragDrop: TDragDropEvent; |
|
This handler determines the action on an drop onto this control, in a drag-drop operation. |
property OnDragOver: TDragOverEvent; |
|
Event handler for a control being dragged over this control. |
property OnEndDock: TEndDragEvent; |
|
Notification handler for the end of a docking operation. |
property OnEndDrag: TEndDragEvent; |
|
Notification handler for the end of a dragging operation. |
property OnMouseDown: TMouseEvent; |
|
Event handler for mouse button going down. |
property OnMouseEnter: TNotifyEvent; |
|
Event handler for mouse entering the area of the control. |
property OnMouseLeave: TNotifyEvent; |
|
Event handler for mouse leaving the area of the control. |
property OnMouseMove: TMouseMoveEvent; |
|
Event handler for mouse movement within the control. |
property OnMouseUp: TMouseEvent; |
|
Event handler for mouse button going up. |
property OnMouseWheel: TMouseWheelEvent; |
|
Event handler for mouse wheel turned. |
property OnMouseWheelDown: TMouseWheelUpDownEvent; |
|
Event handler for downward movement of mouse wheel. |
property OnMouseWheelUp: TMouseWheelUpDownEvent; |
|
Event handler for upward movement of the mouse wheel. |
property OnMouseWheelHorz: TMouseWheelEvent; |
|
Event handler for horizontal movements of the mouse wheel. |
property OnMouseWheelLeft: TMouseWheelUpDownEvent; |
|
Event handler for left movements of the mouse wheel. |
property OnMouseWheelRight: TMouseWheelUpDownEvent; |
|
Event handler for right movements of the mouse wheel. |
property OnPaint: TNotifyEvent; |
|
Event handler signalled to paint the control. |
property OnResize: TNotifyEvent; |
|
Notification handler for a resize of the control. |
property OnStartDock: TStartDockEvent; |
|
Event handler for the start of a docking operation. |
property OnStartDrag: TStartDragEvent; |
|
Event handler for the start of a dragging operation. |
property Shape: TShapeType; [rw] |
|
Indicates the geometric shape drawn in the control. |
property ShowHint: Boolean; |
|
Enables the Hint display. |
property Visible: Boolean; |
|
Allows the control, and all of its children, to be displayed or hidden. |
end; |
|
TShape draws an arbitrary geometric shape. |
|
| | ||
|
TGraphicControl is the base class for all lightweight controls. |
|
| | ||
|
The base class for visible controls. |
|
| | ||
|
The base class for LCL components which have an associated widget. |
|
| | ||
TComponent |
||
? | ||
TObject |
TShape is a TGraphicControl descendant used to draw an arbitrary geometric shape. It may be one of a series of standard shapes defined in the TShapeType enumeration.
It can be displayed using the Paint method, or the Brush and Pen tools.
|
TShapeType is an enumerated type with values representing standard geometric shapes. |
lazarus-ccr.sourceforge.net |