TMlSkinTabset

用法要点

• 和 TMlSkinPageControl 不同，它只管标签栏本身，通常配合 TFrame 或多个 Panel 切换内容。
• CloseButtonVisible 显示关闭按钮，点击时触发 OnCloseButtonClick，在这里移除对应的标签和内容。
• AllowDragTab 打开后可以拖动标签调整顺序。
• 标签宽度用 ButtonWidth，或打开 AutoButtonWidth 随文字自适应，并用 MaxButtonWidth 限制上限。

示例

摘自 Demo：MlSkin.Demo.多页面切换(含关闭按钮 TMlSkinTabset+TFrame).v3.0（窗体文件 .dfm）

object mltbs1: TMlSkinTabset
  Left = 0
  Top = 0
  Width = 750
  Height = 38
  Color = clBlack
  CloseButton.Active = True
  CloseButton.Image = 'MlSkinMini_close_btn'
  CloseButton.Normal = 0
  CloseButton.Hot = 1
  CloseButton.Disable = 0
  CloseButton.Count = 2
  CloseButton.Pressed = 1
  CloseButtonVisible = True
  OnCloseButtonClick = mltbs1CloseButtonClick
  DelayRefresh = True
  Items = <
  ...

属性 28

名称	类型	默认值	说明
AllowDragTab	Boolean	False	是否允许拖动标签调整顺序。
AutoButtonWidth	Boolean	False	标签宽度是否随文字长度自动调整。
CloseButton	TPngPictures	—	标签上关闭按钮的图片（正常、悬停、按下各一帧）。
CloseButtonVisible	Boolean	False	是否在标签上显示关闭按钮。
CloseButtonOffset	TMlOffset	—	关闭按钮的位置偏移（X、Y）。
DelayRefresh	Boolean	False	延迟刷新，批量修改标签时可减少重绘。
TextOffset	TMlBtnItemOffset	—	标签文字的偏移量（X、Y）。
Items	TMlSkinToolbarItems	—	控件的项目集合，在对象检查器里展开可逐项编辑。
Images	TCustomImageList	—	图标来源的 ImageList。
ButtonImage	TPngPictures	—	标签背景图片（正常、悬停、选中各一帧）。
ButtonWidth	Integer	48	标签宽度（像素）。
MaxButtonWidth	Integer	0	标签最大宽度（像素），0 表示不限制。
ButtonHeight	Integer	48	标签高度（像素）。
SpaceSize	Integer	3	标签之间的间距（像素）。
MultiLine	Boolean	False	标签放不下时是否换行显示。
ScrollSize	Integer	15	滚动条的宽度（像素）。
MarginSize	Integer	20	标签栏内容与边缘的间距（像素）。
MarginTextSize	Integer	2	标签内图标与文字之间的间距（像素）。
Alpha	Byte	192	透明度，0 为完全透明、255 为不透明。
BorderSides	TSides	—	画哪几条边框（上、下、左、右可任意组合）。
BorderColor	TColor	$00D9CBBA	边框颜色。
BackgroundImage	TMlResID	—	背景图片，填图片资源 ID 或图片文件路径。
BackgroundFillType	TMlPngFillType	ftNormal	背景图片的铺法：ftNormal 原样、ftTile 平铺、ftAutoStretch 自动拉伸、ftCenter 居中、ftStretch 拉伸铺满、ftGradient 渐变。
BackgroundOffsetX	Integer	0	背景图片的横向偏移（像素）。
BackgroundOffsetY	Integer	0	背景图片的纵向偏移（像素）。
DoubleBorder	Boolean	True	双层边框，在边框内侧再画一条线。
FontHot	TFont	—	鼠标移上去时使用的字体。
FontDown	TFont	—	按下时使用的字体。

事件 7

名称	类型	默认值	说明
OnCloseButtonClick	TToolbarClickEvent	—	点击标签上的关闭按钮时触发，通常在这里移除标签和对应内容。
OnPaintCloseButton	TPaintCloseButtonEvent	—	绘制关闭按钮时触发，可自定义它的外观。
OnItemClick	TToolbarClickEvent	—	点击某一项时触发。
OnItemDown	TToolbarClickEvent	—	标签被按下时触发。
OnItemFocusChanged	TNotifyEvent	—	焦点标签改变时触发。
OnDrawItem	TMlToolbarItemDrawEnvent	—	绘制某一项时触发，可以自定义该项的外观。
OnButtonWidthChanged	TToolbarButtonWidthEvent	—	标签宽度变化后触发。

TMlSkinCustomPanel 的属性 1

名称	类型	默认值	说明
Color	TColor	clWhite	控件的底色。Transparent 打开时不生效。

TMlSkinCustomPanel 的事件 1

名称	类型	默认值	说明
OnCustomDraw	TMlCustomDrawEvent	—	自绘事件，可在控件画完后继续绘制自己的内容。

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 属性同样可用，用法与原生控件一致。