DevExpress VCL中使用皮肤及保持EXE体积不巨增的办法
一. 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;