TMlSkinCornerButton
圆角按钮,常用来做标签式按钮和圆角提示框上的按钮。
用法要点
- 外观属性在基类里,圆角大小、颜色和边框都可在对象检查器中直接设置。
- Demo「圆角标签按钮和提示框」演示了它的典型用法。
示例
摘自 Demo:MlSkin.Demo.HtmlLabel&TMlSkinPopupMessage功能演示.v4.x(窗体文件 .dfm)
object btn28: TMlSkinCornerButton
Left = 270
Top = 717
Width = 134
Height = 41
AutoInvalidate = True
Down = False
HotFont.Charset = ANSI_CHARSET
HotFont.Color = 6245689
HotFont.Height = -13
HotFont.Style = []
DropdownMenuOffset.X = -4
DropdownMenuOffset.Y = -4
PressedOffset = 0
Anchors = [akLeft, akBottom]
Caption = 'Refresh'
DoubleBuffered = False
Font.Charset = ANSI_CHARSET
Font.Color = 6245689
Font.Height = -13
这个控件没有自己新增的属性,全部沿用基类。
TMlSkinCustomButton 的属性 15
| 名称 | 类型 | 默认值 | 说明 |
|---|---|---|---|
About | TMlAboutInfo | — | 设计期属性。在对象检查器里双击会弹出 MlSkin 的关于窗口,显示组件版本信息;运行时没有作用,也不会保存到 dfm。 |
AllowAllUp | Boolean | False | 同组按钮是否允许全部弹起。关掉后组内必须有一个处于按下状态。 |
IgnoreMouse | Boolean | False | 忽略鼠标。打开后控件不响应鼠标,事件穿透到下面的控件。 |
CycleDownClick | Boolean | False | 按住不放时循环触发点击,常用于数值增减按钮;触发的是 OnCycleDownClick。 |
WordWrap | Boolean | False | 文字过长时是否换行显示。 |
Down | Boolean | — | 按钮是否处于按下状态,配合 GroupIndex 可做成开关或标签页效果。 |
HotFont | TFont | — | 鼠标移上去时使用的字体,可换颜色或加下划线做悬停效果。 |
GroupIndex | Integer | 0 | 分组编号。编号相同的按钮互斥,同一时间只有一个处于按下状态;0 表示不分组。 |
DropdownMenuOffset | TMlBtnItemOffset | — | 下拉菜单弹出位置的偏移量(X、Y)。 |
PressedOffset | Integer | 1 | 按下时内容向右下偏移的像素数,用来做按下去的效果,0 表示不偏移。 |
CanFocused | Boolean | True | 控件是否可以获得焦点。关掉后点击不抢焦点,也不能用 Tab 切换到它。 |
Default | Boolean | False | 是否为默认按钮。窗体上按回车时相当于点击它。 |
Cancel | Boolean | False | 是否为取消按钮。窗体上按 Esc 时相当于点击它。 |
ModalResult | TModalResult | 0 | 点击后给模态窗体返回的结果值,用法与标准按钮相同。 |
ShowFocusFrame | Boolean | False | 是否显示焦点虚线框。 |
TMlSkinCustomButton 的事件 2
| 名称 | 类型 | 默认值 | 说明 |
|---|---|---|---|
OnCustomPaint | TCustomPaintEvent | — | 自绘事件。需要完全自己画按钮时,在这里接管绘制。 |
OnCycleDownClick | TNotifyEvent | — | 按住不放期间反复触发(需先打开 CycleDownClick)。 |
TMlSkinCustomControl 的属性 5
| 名称 | 类型 | 默认值 | 说明 |
|---|---|---|---|
About | TMlAboutInfo | — | 设计期属性。在对象检查器里双击会弹出 MlSkin 的关于窗口,显示组件版本信息;运行时没有作用,也不会保存到 dfm。 |
Transparent | Boolean | True | 背景是否透明。打开后控件不画自己的底色,直接显示窗体的背景(图片或颜色)。 |
Color | TColor | clWhite | 控件的底色。Transparent 打开时不生效。 |
AutoInvalidate | Boolean | False | 内容变化时是否自动重绘。动态改属性看不到变化时可以打开。 |
EraseBackground | Boolean | False | 绘制前是否擦除背景。界面闪烁时可以调整这个开关。 |
TMlSkinCustomControl 的事件 4
| 名称 | 类型 | 默认值 | 说明 |
|---|---|---|---|
OnDPIChanged | TMlDPIChangedEvent | — | 屏幕 DPI 改变时触发(例如窗口被拖到另一块不同缩放的显示器上),可在这里重新调整自绘内容。 |
OnBackgroundChanging | TMlBackgroundEvent | — | 背景即将改变时触发,可在这里干预要绘制的背景。 |
OnBackgroundChanged | TMlCustomDrawEvent | — | 背景绘制完成后触发,可在背景之上继续自绘内容。 |
OnVisibleChanged | TNotifyEvent | — | 控件显示或隐藏时触发。 |
本页只列出 MlSkin 新增的属性和事件;Align、Anchors、Font、OnClick 等标准 VCL 属性同样可用,用法与原生控件一致。