【玩转控件系列】Style控件组之TscSplitView控件 --制作可伸缩的导航菜单栏
敬请期待教程。
1.放置一个SplitView
2.设置属性:
Placement:scsvLeft
Opened:False
OpenWidth:200
CompactWidth:50
BorderStyle:None
Color:$001B1A14
3.放置一个TImageList
Name:ImageList24
添加若干图片
4.在SplitView上添加scButton
添加8个scButton6
属性设置
Align:alTop ,最有一个为:alBottom
ColorOptions:颜色值分别为:$001B1A14 ,$00514B41
images:刚才添加的ImageList
设置好ImageIndex,HotImageIndex
5.添加一个PageControl1
6.第一个顶端的按钮的点击事件代码:
scSplitView1.Opened := not scSplitView1.Opened;
第二个按钮的点击事件代码:
scPageControl1.ActivePageIndex := 0;
第三个按钮的点击事件代码:
scPageControl1.ActivePageIndex :=1;
7.运行,大功告成。