盒子论坛 v2.1

以下是个人使用经验，整理成文，给不会的兄弟看看，会的就不要来了哈：）

第一步－安装：

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先，分别点三个按钮试试再！
----------------------------------------------
秋风清　秋月明，几上闲琴黯生尘。
夜来忽忆少年事，陌上柳绿草青青。
相逢一笑言未语，携手相看自倾心。
二十二载云烟里，云含风韵烟含情。
风尘渺落风霜浸，但闻长空雁长鸣。
姿容如花颜如玉，只在平生梦里寻。
秋风清　秋月明，秋灯秋雨愁煞人。
天涯路远人何在，午夜梦回空扰惊。

作者：

liweiming (伊达)	★☆☆☆☆	-
	禁用账号

2004/3/9 16:04:46

1楼：

……
被禁用帐号，帖子内容自动屏蔽！
……
----------------------------------------------
我是小菜鸟，我向大家学习。

大虾帮帮我，让我长成老鸟。

作者：

fox7899 (fox7899)	★☆☆☆☆	-
	盒子活跃会员

2004/3/11 17:20:04

2楼：

BSFD7.dpk 没有此文件？
----------------------------------------------
-

作者：

chidao ( )	★☆☆☆☆	-
	盒子活跃会员

2004/3/16 11:18:18

3楼：

我有问题请教:
我安装是安装上了,不过在使用过程中发现,bsSkinMainMenu组件的SkinData设为了bsSkindata1后,运行时菜单总是没有显示出来,看不见主菜单.
另外,sbSkindbgrid组件没有上下和左右滚动条.

望大侠给赐教!

----------------------------------------------
-

作者：

power_source (power)	★☆☆☆☆	-
	盒子活跃会员

2004/3/16 12:20:50

4楼：

我要提问！此控件的combobox组件的属性设为bscbEditStyle时它就不响应回车事件，请帮忙解决！
----------------------------------------------
我真的不会！

作者：

hbqckzj (醉里寻欢)	★☆☆☆☆	-
	盒子活跃会员

2004/3/17 7:41:40

5楼：

做主菜单要先加上一个bsSkinMainMenuBar控件，然后加上一个bsSkinMainMenu，把
bsSkinMainMenuBar的MainMenu属性为bsSkinMainMenu，再把bsBusinessSkinForm的MainMenuBar属性指为bsSkinMainMenuBar即可！

至于滚动条，需要自己手动加上，然后把它的HScrollBar和VScrollBar属性指向你所加的滚动条！
----------------------------------------------
秋风清　秋月明，几上闲琴黯生尘。
夜来忽忆少年事，陌上柳绿草青青。
相逢一笑言未语，携手相看自倾心。
二十二载云烟里，云含风韵烟含情。
风尘渺落风霜浸，但闻长空雁长鸣。
姿容如花颜如玉，只在平生梦里寻。
秋风清　秋月明，秋灯秋雨愁煞人。
天涯路远人何在，午夜梦回空扰惊。

作者：

hbqckzj (醉里寻欢)	★☆☆☆☆	-
	盒子活跃会员

2004/3/17 7:47:28

6楼：

4楼的兄弟，不知道你所说的响应回车事件是什么意思，这样可以吗？

procedure TForm1.bsSkinComboBox1KeyPress(Sender: TObject; var Key: Char);
begin
if key=#13 then
bsSkinComboBox1.Items.Add(bsSkinComboBox1.Text);
end;
----------------------------------------------
秋风清　秋月明，几上闲琴黯生尘。
夜来忽忆少年事，陌上柳绿草青青。
相逢一笑言未语，携手相看自倾心。
二十二载云烟里，云含风韵烟含情。
风尘渺落风霜浸，但闻长空雁长鸣。
姿容如花颜如玉，只在平生梦里寻。
秋风清　秋月明，秋灯秋雨愁煞人。
天涯路远人何在，午夜梦回空扰惊。

作者：

chidao ( )	★☆☆☆☆	-
	盒子活跃会员

2004/3/17 14:28:12

7楼：

感谢楼主,菜单已顺利做出,还有就是,bsSkinMainMenuBar1的businessSkinform属性要指向bsBusinessSkinForm1.
----------------------------------------------
-

信息

登陆以后才能回复