DevExpress VCL中使用皮肤及保持EXE体积不巨增的办法

2012年04月05日 程序设计 暂无评论

一. DELPHI的主菜单: Project   -> Modify Skin Options ,弹出Project Skin Options Editor 对话框, 从中选择Enable skin Support ,从下面的列表中,只选择: UserSkin这一项,其它的取消选择,点OK退出.   (注意:此步骤需DEV40以上版本才有效)

二. 从Dev Express 项下选择dxSkinController控件,添加到工程,设置dxSkinController1的SkinName属性设为:UserSkin ;

三.  代码:  

   str:='Office2007Black.skinres'; //此处请各位自行修改,可以下载上面的皮肤资源后,
                                   //遍历所有的皮肤资源文件.
   dxSkinsUserSkinLoadFromFile(Trim(ExtractFilePath(Application.ExeName)) + '\skin\' + str);
   dxSkinController1.NativeStyle:=False;
   dxSkinController1.UseSkins:=True;

给我留言

Copyright © 懒猫窝窝 保留所有权利.   主题设计 AB模板网

用户登录