<< Click to display table of contents >> TSRVButton |
TSRVLabel is a control displaying text.
Unit SRVButton;
Syntax
TSRVButton = class(TSRVCustomControl)
TObject
TPersistent
TComponent
TControl
TWinControl
TCustomControl
This component publishes the following properties inherited from TSRVCustomControl:
•DrawOnPrint;
•SkinManager;
•SkinSchemeIndex;
•SRVControlStyle;
•properties inherited from TCustomControl.
New published properties:
Property |
Type |
Default value |
Meaning |
---|---|---|---|
Default |
Boolean |
False |
Determines whether the button’s OnClick event handler executes when the Enter key is pressed. |
Glyph |
TPicture |
(empty) |
Specified the picture that appears on the button. The picture is displayed to the left/right side of text, depending on BiDiMode. |
ModalResult |
TModalResult |
mrNone |
Determines whether and how the button closes its (modal) parent form. |
OffsetOnClick |
TRVPixel96Length |
0 |
Specifies how far Glyph and Caption are shifted when the button is pressed. |
The following published properties work only if SRVControlStyle = srvcsClassic:
Property |
Type |
Default value |
Meaning |
---|---|---|---|
MouseBorderWidth |
TRVPixel96Length |
2 |
Width of highlight frame under the mouse or when the button is focused |
ShowFocusRect |
Boolean |
True |
Shows/hides a dotted rectangle drawn on a focused button |
New published event:
•OnClick, occurs when the user clicks the control.
The default button appearance (if skins are not assigned) depends on SRVControlStyle: TSRVControlStyle property:
srvcsSimple (if RVControlsPainter.Theme = rvctPaleBlue):
srvcsClassic:
If SkinManager is assigned, the button is drawn using SkinManager.CurrentSkin.BoxSchemes[SkinSchemeIndex].
Example:
You can also use the skin font: SkinManager.CurrentSkin.Fonts[SkinFontIndex].