用法要点
- 显示的年月用
Year、Month 设置,FocusDay 是当前选中的日期。
- 表头(星期行)和单元格的颜色、字体分开设置:
HeaderColor、HeaderFont、CellColor、CellFont。
- 点击某一天触发
OnCellClick;要在格子里画标记(如有日程的日期加个小圆点),用 OnCellDrawing 自绘。
- 星期文字用
TextSu 到 TextSa 自定义,方便做多语言。
属性 24
| 名称 | 类型 | 默认值 | 说明 |
|---|
HolidayTextColor | TColor | — | 周末(休息日)日期的文字颜色。 |
HeaderColor | TColor | — | 表头(星期行)的底色。 |
HeaderFont | TFont | — | 表头文字的字体。 |
HeaderHeight | Integer | — | 表头的高度(像素)。 |
CellColor | TColor | — | 日期格子的底色。 |
CellFocusColor | TColor | — | 选中日期格子的底色。 |
CellFont | TFont | — | 日期文字的字体。 |
TextSu | string | — | 星期日的表头文字。 |
TextMo | string | — | 星期一的表头文字。 |
TextTu | string | — | 星期二的表头文字。 |
TextWe | string | — | 星期三的表头文字。 |
TextTh | string | — | 星期四的表头文字。 |
TextFr | string | — | 星期五的表头文字。 |
TextSa | string | — | 星期六的表头文字。 |
Year | Word | — | 当前显示的年份。 |
Month | Word | — | 当前显示的月份(1~12)。 |
FocusDay | Word | — | 当前选中的日期(几号)。 |
Padding | Integer | — | 日历内容与控件边缘的间距(像素)。 |
FrameColor | TColor | — | 边框颜色。 |
MaxDate | TDate | — | 可选择的最晚日期。 |
MinDate | TDate | — | 可选择的最早日期。 |
Alpha | Byte | 192 | 透明度,0 为完全透明、255 为不透明。 |
BorderSides | TSides | — | 画哪几条边框(上、下、左、右可任意组合)。 |
BorderColor | TColor | $00D9CBBA | 边框颜色。 |
事件 3
| 名称 | 类型 | 默认值 | 说明 |
|---|
OnCellClick | TCellClickEvent | — | 点击某个日期格子时触发,参数里带着被点的日期。 |
OnCellDrawing | TDrawCellEvent | — | 绘制日期格子时触发,可以在格子里自己画标记(如有日程的日期加圆点)。 |
OnChanged | TNotifyEvent | — | 状态或数值改变后触发。 |
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 属性同样可用,用法与原生控件一致。