轉(zhuǎn)帖|其它|編輯:郝浩|2012-10-11 14:35:03.000|閱讀 2336 次
概述:本文主要介紹如何更換DevExpress控件皮膚。
# 界面/圖表報(bào)表/文檔/IDE等千款熱門軟控件火熱銷售中 >>
1. 在項(xiàng)目中添加引用 DevExpress.BonusSkins和 DevExpress.OfficeSkins (這兩個(gè)引用中有大量的皮膚,默認(rèn)的只有幾個(gè))
2.在啟動(dòng)Form的 Designer文件中添加main函數(shù)
Shared Sub main() '注冊(cè)皮膚 DevExpress.UserSkins.OfficeSkins.Register() DevExpress.UserSkins.BonusSkins.Register() DevExpress.Skins.SkinManager.EnableFormSkins() Application.Run(New XtraForm1())'啟動(dòng)窗口 End Sub
3.將項(xiàng)目的啟動(dòng)項(xiàng)修改為sub main(), 若無(wú)此項(xiàng),將下面的"啟動(dòng)應(yīng)用程序框架"的勾去掉
4.在啟動(dòng)窗口添加控件DefaultLookAndFeel,
5.啟動(dòng)時(shí)在load事件中 添加
Me.DefaultLookAndFeel1.LookAndFeel.SkinName = "Office 2007 Blue" '皮膚名,可用其他
至此,實(shí)現(xiàn)換膚功能. 如果要實(shí)現(xiàn)啟動(dòng)后更換皮膚, 可以把所有可用的皮膚名放到ComboBoxEdit1中即可.
附:
默認(rèn)的皮膚名:Caramel,Money Twins,Lilian,The Asphalt World,iMaginary,Black,Blue
BonusSkins的皮膚名:Coffee,Liquid Sky,London Liquid Sky,Glass Oceans,Stardust,Xmas 2008 Blue,Valentine,McSkin,Summer 2008,Pumpkin,Dark Side,Springtime,Darkroom,Foggy,High Contrast,Seven,Seven Classic,Sharp,Sharp Plus,DevExpress Style
Office的皮膚名:Office 2007 Blue,Office 2007 Black,Office 2007 Silver,Office 2007 Green,Office 2007 Pink,Office 2010 Blue,Office 2010 Black,Office 2010 Silver
得到皮膚名的代碼
<pre class="vb" name="code">Dim str As String = "" For Each skinName As DevExpress.Skins.SkinContainer In DevExpress.Skins.SkinManager.Default.Skins str = str & skinName.SkinName & "," Next</pre> <pre></pre> <pre></pre>
本站文章除注明轉(zhuǎn)載外,均為本站原創(chuàng)或翻譯。歡迎任何形式的轉(zhuǎn)載,但請(qǐng)務(wù)必注明出處、不得修改原文相關(guān)鏈接,如果存在內(nèi)容上的異議請(qǐng)郵件反饋至chenjj@fc6vip.cn
文章轉(zhuǎn)載自:huaxialonger的專欄-CSDN