1、先放bsbusinessskinform、bsskindata、bsstoredskin各一个到窗体上
2、修改bsbusinessskinform的skindata属性为bsskindata1
3、修改bsskindata1的storedskin属性为bsstoredskin1
4、修改bsstoredskin1的filename属性，指向一个皮肤文件，例如我的55套皮肤包是放在c:\program files\borland\delphi7\bsf-skins\skins文件夹里，我就修改
bsstoredskin1的filename属性为c:\program files\borland\delphi7\bsf-skins\skins\animate\skin.ini
5、在delphi设计窗口中按下f9
6、爽吧!!!!!
第一步－安装：
1、双击bsfd7.dpk文件，在delphi 7.0中打开
2、单击compile按钮，你会发现原来不可用的install按钮可以使用了
3、单击install按钮，会弹出来一个对话框提示你“安装成功！”
4、将所有源文件复制到c:\program files\borland\delphi7\lib文件夹中（如delphi安装路径不同的话，请各位老兄自行更改）
第二步－最基本的使用方法：
当你安装成功后，你会在delphi的组件面板上发现三个控件组，它们是：
businessskinform vcl和businessskinform db vcl和businessskinform vcl dialogs,顾名思义，第一个是常用组件，第二个是数据库组件，第三个是对话框组件。
按照下面的步骤，不用写一行代码，你可以马上做出一个有漂亮界面的程序来
1、先放bsbusinessskinform、bsskindata、bsstoredskin（在businessskinform vcl控件组中）各一个到窗体上
2、修改bsbusinessskinform的skindata属性为bsskindata1
3、修改bsskindata1的storedskin属性为bsstoredskin1
4、修改bsstoredskin1的filename属性，指向一个皮肤文件，例如皮肤包是放在c:\program files\borland\delphi7\bsf-skins\skins文件夹里，我就修改
bsstoredskin1的filename属性为c:\program files\borland\delphi7\bsf-skins\skins\animate\skin.ini
5、按下f9键运行。
第三步－换肤：
现在的程序流行换肤功能，你是否也想做出一个可以让使用者换肤的程序来呢？请跟我一步一步来做：
1、请做完第二步中的各个步骤
2、添加三个bsskinspeedbutton到窗体上，name分别是bsskinspeedbutton1、bsskinspeedbutton2、bsskinspeedbutton3，caption分别是皮肤1、皮肤2、皮肤3
3、添加两个bsstoredskin到窗体上，加上上面已添加的一个，共是三个,name分别是bsstoredskin2、bsstoredskin3。
4、将这三个bsstoredskin的filename属性各指向三个不同的皮肤文件（什么？不知道怎么指？晕！参见第二步中的步骤4！）
5、添加代码，如下：
procedure tform1.bsskinspeedbutton1click(sender: tobject);
begin
bsskindata1.storedskin:=bsstoredskin1;
end;
procedure tform1.bsskinspeedbutton2click(sender: tobject);
begin
bsskindata1.storedskin:=bsstoredskin2;
end;
procedure tform1.bsskinspeedbutton3click(sender: tobject);
begin
bsskindata1.storedskin:=bsstoredskin3;
end;
6、按下f9先，分别点三个按钮试试再！
做主菜单要先加上一个bsskinmainmenubar控件，然后加上一个bsskinmainmenu，把
bsskinmainmenubar的mainmenu属性为bsskinmainmenu，再把bsbusinessskinform的mainmenubar属性指为bsskinmainmenubar即可！
至于滚动条，需要自己手动加上，然后把它的hscrollbar和vscrollbar属性指向你所加的滚动条！
如对本文有疑问， 点击进行留言回复！！
uniGUI之自定义JS事件动作ClientEvents(30)
TChart-数据编辑（TChartListBox,TeeCommander）
我要评论
网友评论