Notes
- One color per state:
NormalColor, HotColor on hover and PressedColor while pressed.
- For rounded buttons turn on
RoundFrame, set the radius with RoundSize, and use SmoothRound for smoother edges.
BorderColor and BorderSides control the border color and which edges are drawn.
- Add an icon with
Image, and a different one on hover with HotImage.
Example
From the demo MlSkin.Demo.360云盘.v3.0 (.dfm form file)
object btn5: TMlSkinColorButton
Left = 11
Top = 6
Width = 79
Height = 28
AutoInvalidate = True
Down = False
HotFont.Charset = DEFAULT_CHARSET
HotFont.Color = clWhite
HotFont.Height = -11
HotFont.Name = 'Tahoma'
HotFont.Style = []
DropdownMenuOffset.X = -4
DropdownMenuOffset.Y = -4
Font.Charset = DEFAULT_CHARSET
Font.Color = 8609875
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
Properties 15
| Name | Type | Default | Description |
|---|
Alpha | Byte | 255 | Button opacity: 0 fully transparent, 255 opaque. |
CaptionVisible | Boolean | — | Whether the caption is drawn. Turn it off for icon-only buttons. |
CaptionOffset | TMlBtnItemOffset | — | Offset (X, Y) of the caption inside the control, for fine positioning. |
DropdownMenu | TPopupMenu | — | The popup menu to attach. Once set, the button shows a dropdown arrow and clicking it opens the menu. |
ImageOffset | TMlBtnItemOffset | — | Offset (X, Y) of the icon inside the control. |
Image | TMlResID | — | Icon shown on the button. |
HotImage | TMlResID | — | Icon shown while the mouse is over the button. |
NormalColor | TColor | $003854FF | Button color in the normal state. |
PressedColor | TColor | $001A1A9D | Button color while pressed. |
HotColor | TColor | $004343E0 | Button color while the mouse is over it. |
BorderColor | TColor | $00DFCBBB | Border color. |
BorderSides | TSides | — | Which border edges are drawn — any combination of top, bottom, left and right. |
RoundFrame | Boolean | False | Draws the button with rounded corners. |
RoundSize | Integer | 3 | Corner radius in pixels. |
SmoothRound | Boolean | True | Anti-aliases the rounded corners for smoother edges. |
Properties of TMlSkinCustomButton 15
| Name | Type | Default | Description |
|---|
About | TMlAboutInfo | — | A design-time property: double-clicking it in the Object Inspector opens the MLSkin about box with the component version. It has no effect at run time and is not stored in the .dfm. |
AllowAllUp | Boolean | False | Whether all buttons in the group may be up at once. With it off, one button in the group always stays down. |
IgnoreMouse | Boolean | False | Ignores the mouse: the control stops responding and events pass through to whatever is underneath. |
CycleDownClick | Boolean | False | Repeats the click while the button is held down — useful for spin-style buttons. It fires OnCycleDownClick. |
WordWrap | Boolean | False | Whether long captions wrap to the next line. |
Down | Boolean | — | Whether the button is in the pressed state; combined with GroupIndex it behaves like a toggle or a tab. |
HotFont | TFont | — | Font used while the mouse is over the control, typically a different color or an underline for the hover effect. |
GroupIndex | Integer | 0 | Group number: buttons sharing a number are mutually exclusive, so only one stays down. 0 means no grouping. |
DropdownMenuOffset | TMlBtnItemOffset | — | Offset (X, Y) applied to where the dropdown menu pops up. |
PressedOffset | Integer | 1 | How many pixels the content shifts down-right while pressed, giving the push-in effect; 0 means no shift. |
CanFocused | Boolean | True | Whether the control can take focus. With it off, clicking does not steal focus and Tab skips it. |
Default | Boolean | False | Marks the default button: pressing Enter on the form clicks it. |
Cancel | Boolean | False | Marks the cancel button: pressing Esc on the form clicks it. |
ModalResult | TModalResult | 0 | The result returned to a modal form when the button is clicked, exactly as on the stock button. |
ShowFocusFrame | Boolean | False | Whether the dotted focus rectangle is drawn. |
Events of TMlSkinCustomButton 2
| Name | Type | Default | Description |
|---|
OnCustomPaint | TCustomPaintEvent | — | Custom paint event: take over drawing here when you want to paint the button yourself. |
OnCycleDownClick | TNotifyEvent | — | Fires repeatedly while the button is held down; requires CycleDownClick. |
Properties of TMlSkinCustomControl 5
| Name | Type | Default | Description |
|---|
About | TMlAboutInfo | — | A design-time property: double-clicking it in the Object Inspector opens the MLSkin about box with the component version. It has no effect at run time and is not stored in the .dfm. |
Transparent | Boolean | True | Transparent background: the control skips its own fill and shows the form background (image or color) instead. |
Color | TColor | clWhite | Background color of the control; ignored while Transparent is on. |
AutoInvalidate | Boolean | False | Repaints automatically when the content changes. Turn it on if property changes do not show up. |
EraseBackground | Boolean | False | Whether the background is erased before painting; worth toggling if the control flickers. |
Events of TMlSkinCustomControl 4
| Name | Type | Default | Description |
|---|
OnDPIChanged | TMlDPIChangedEvent | — | Fires when the screen DPI changes, for example when the window moves to a monitor with a different scaling — a good place to re-adjust anything you draw yourself. |
OnBackgroundChanging | TMlBackgroundEvent | — | Fires just before the background changes, giving you a chance to adjust what is drawn. |
OnBackgroundChanged | TMlCustomDrawEvent | — | Fires after the background has been drawn, so you can paint on top of it. |
OnVisibleChanged | TNotifyEvent | — | Fires when the control is shown or hidden. |
Only the properties and events MLSkin adds are listed here. Standard VCL properties such as Align, Anchors, Font and OnClick are available too and behave exactly as on the stock controls.