TSRVCanvasControl is the base class for lightweight SRVControls.
Unit SRVControl;
Syntax
TSRVCanvasControl = class(TGraphicControl);
Hierarchy
TObject
TPersistent
TComponent
TControl
TGraphicControl
Properties and events
Public properties:
Property |
Type |
Default value |
Meaning |
Alignment |
TAlignment |
taLeftJustify |
|
DrawOnPrint |
Boolean |
True |
if True, this control will be printed |
|
Boolean |
|
Read-only. Returns True if the user pressed the left mouse button above the control. |
|
Boolean |
|
Read-only. Returns True, if the mouse pointer is above the control |
Published events:
•OnMouseEnter, OnMouseLeave (TNotifyEvent) occur when the mouse pointer enter/leaves the control.
•OnPaint (TSRVCtrlPaintPage) occurs when the control must be painted.
type
TSRVCtrlPaintPage = procedure(Sender: TObject; R: TRect; Canvas: TCanvas) of object;
Protected properties:
Property |
Type |
Default value |
Meaning |
|
|
A link to a skin manager component. |
|
|
Integer |
0 |
Index in a scheme in SkinManager.CurrentSkin (a scheme depends on the control type) |
