用法要点
- 选项文字放在
Items 里,当前选中项用 ItemIndex 读写。
Columns 设定分几列排布,ItemHeight 和 VerticalSpacing 控制每项的高度和行距。
- 需要自定义每项外观时,用
OnDrawItem 自绘。
属性 24
| 名称 | 类型 | 默认值 | 说明 |
|---|
About | TMlAboutInfo | — | 设计期属性。在对象检查器里双击会弹出 MlSkin 的关于窗口,显示组件版本信息;运行时没有作用,也不会保存到 dfm。 |
Columns | Integer | 1 | 分几列排列选项。 |
ItemIndex | Integer | -1 | 当前选中项的序号,从 0 开始,-1 表示没有选中。 |
Items | TStrings | — | 选项文字列表,每行一项。 |
ItemHeight | Integer | 17 | 每项的高度(像素)。 |
Kind | TGroupControlKind | gckRadio | 控件的类型或方向。 |
Offset | TMlOffset | — | 内容整体的偏移量(X、Y)。 |
VerticalSpacing | Integer | 3 | 行与行之间的间距(像素)。 |
Pictures | TMlResID | — | 控件使用的图片,按状态分帧(未选中、选中、悬停、禁用等)。 |
Alpha | Byte | 192 | 透明度,0 为完全透明、255 为不透明。 |
BorderAlpha | Byte | 255 | 边框透明度,0 为完全透明、255 为不透明。 |
BorderSides | TSides | — | 画哪几条边框(上、下、左、右可任意组合)。 |
BorderColor | TColor | $00D9CBBA | 边框颜色。 |
Color | TColor | clWhite | 控件的底色。Transparent 打开时不生效。 |
BackgroundFillType | TMlPngFillType | ftNormal | 背景图片的铺法:ftNormal 原样、ftTile 平铺、ftAutoStretch 自动拉伸、ftCenter 居中、ftStretch 拉伸铺满、ftGradient 渐变。 |
BackgroundImage | TMlResID | — | 背景图片,填图片资源 ID 或图片文件路径。 |
BackgroundOffsetX | Integer | 0 | 背景图片的横向偏移(像素)。 |
BackgroundOffsetY | Integer | 0 | 背景图片的纵向偏移(像素)。 |
GradientDirection | TGradientDirection | gdVertical | 渐变方向:gdHorizontal 水平、gdVertical 垂直。 |
GradientAlign | TGradientAlign | gaCenter | 渐变的对齐位置:居中、靠左或靠右。 |
GradientSize | Integer | 60 | 渐变区域的大小(像素)。 |
GradientStartColor | TColor | $00FFC446 | 渐变的起始颜色。 |
GradientEndColor | TColor | $00FDF8F3 | 渐变的结束颜色。 |
DoubleBorder | Boolean | True | 双层边框,在边框内侧再画一条线。 |
事件 2
| 名称 | 类型 | 默认值 | 说明 |
|---|
OnChanged | TNotifyEvent | — | 状态或数值改变后触发。 |
OnDrawItem | TMlGCItemDrawEnvent | — | 绘制某一项时触发,可自定义选项的外观。 |
TMlSkinCustomPanel 的事件 1
| 名称 | 类型 | 默认值 | 说明 |
|---|
OnCustomDraw | TMlCustomDrawEvent | — | 自绘事件,可在控件画完后继续绘制自己的内容。 |
TMlSkinCustomControl 的属性 3
| 名称 | 类型 | 默认值 | 说明 |
|---|
Transparent | Boolean | True | 背景是否透明。打开后控件不画自己的底色,直接显示窗体的背景(图片或颜色)。 |
AutoInvalidate | Boolean | False | 内容变化时是否自动重绘。动态改属性看不到变化时可以打开。 |
EraseBackground | Boolean | False | 绘制前是否擦除背景。界面闪烁时可以调整这个开关。 |
TMlSkinCustomControl 的事件 4
| 名称 | 类型 | 默认值 | 说明 |
|---|
OnDPIChanged | TMlDPIChangedEvent | — | 屏幕 DPI 改变时触发(例如窗口被拖到另一块不同缩放的显示器上),可在这里重新调整自绘内容。 |
OnBackgroundChanging | TMlBackgroundEvent | — | 背景即将改变时触发,可在这里干预要绘制的背景。 |
OnBackgroundChanged | TMlCustomDrawEvent | — | 背景绘制完成后触发,可在背景之上继续自绘内容。 |
OnVisibleChanged | TNotifyEvent | — | 控件显示或隐藏时触发。 |
本页只列出 MlSkin 新增的属性和事件;Align、Anchors、Font、OnClick 等标准 VCL 属性同样可用,用法与原生控件一致。