下載本文檔
版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡(jiǎn)介
VC完備界面更換皮膚解決方案-、簡(jiǎn)介VC里邊界面換膚是比較頭痛的問題,網(wǎng)上有不少介紹,但是大多數(shù)僅僅供應(yīng)Dll或者Lib,有代碼的又有許多問題,效果很差。這幾日突然想到一個(gè)解決方案,有源碼,皮膚有一百多個(gè),就是采納Delphi里邊成熟的界面組件vclskin,將它做成Dll來用,效果相當(dāng)不錯(cuò),抓緊介紹給大家。二、效果預(yù)覽實(shí)例中的效果如下圖:效果預(yù)覽三、Dll制作首先啟動(dòng)Delphi7,創(chuàng)建一個(gè)Dll工程。選擇Dll工程類型然后點(diǎn)擊保存全部按鈕,設(shè)定工程名稱Skin。新建的Dll工程然后添加VclSkin里邊的ImgUtil.pas,SkinRead.pas,WinConvert.pas,WinSkinCollection.pas,WinSkinData.pas,WinSkinDlg.pas,WinSkinForm.pas,WinSkinIni.pas,Winskinmenu.pas,WinSkinStore.pas,WinSubClass.pas文件到工程中。再添加Compilers.inc,vclskin.res文件到工程書目中。再添加加載皮膚代碼,編輯后的代碼如下Delphicode復(fù)制代碼{$R*.res}functionLoadSkin(szName:PChar):Integer;stdcall;beginif(GSkinData=nil)thenGSkinData:=TSkinData.Create(nil);GSkinData.SkinFile:=szName;GSkinData.Active:=TRUE;Result:=1;end;procedureDllHandler(Reason:Integer);begincaseReasonofDLL_PROCESS_DETACH:beginGSkinData.Free();end;end;end;exportsLoadSkin;beginDLLProc:=@DllHandler;DllHandler(DLL_PROCESS_ATTACH);end.可以看出這個(gè)Dll只有一個(gè)函數(shù)LoadSkin,入口參數(shù)為皮膚文件路徑名。四、調(diào)用方法創(chuàng)建VC工程SkinTest,VC的創(chuàng)建就不詳細(xì)介紹了,添加代碼如下:在應(yīng)用程序類里添加加載Dll,卸載Dll的代碼:m_hModule=LoadLibrary("Skin.dll");FreeLibrary(m_hModule);在程序的第一個(gè)對(duì)話框初始化的時(shí)候調(diào)用LoadSkin函數(shù):C/C++code復(fù)制代碼typedefint(CALLBACK*FUNC)(PCHAR);voidCSkinTestDlg::InitSkin(){CHARszName[MAX_PATH];CStringstrName=GetAppPath()+"skins\\LE4-DEFAULT.skn";FUNCpFunc=(FUNC)GetProcAddress(theApp.m_hModule,"LoadSkin");strcpy(szName,strName);pFunc(szName);}五、留意事項(xiàng)1、實(shí)例中包含了全部的源代碼,可以隨意修改它,添加從資源加載皮膚,動(dòng)態(tài)換膚的功能。2、實(shí)例中的
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫(kù)網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。
最新文檔
- 2026年石家莊信息工程職業(yè)學(xué)院?jiǎn)握新殬I(yè)技能考試參考題庫(kù)附答案詳解
- 2026年廣東嶺南職業(yè)技術(shù)學(xué)院高職單招職業(yè)適應(yīng)性考試參考題庫(kù)帶答案解析
- 2026年鶴壁汽車工程職業(yè)學(xué)院?jiǎn)握新殬I(yè)技能考試備考題庫(kù)帶答案解析
- 土地流轉(zhuǎn)租賃居間服務(wù)合同協(xié)議2025年樣本
- 2026年湖南高速鐵路職業(yè)技術(shù)學(xué)院高職單招職業(yè)適應(yīng)性測(cè)試備考試題有答案解析
- 2026年河源職業(yè)技術(shù)學(xué)院?jiǎn)握芯C合素質(zhì)筆試備考試題帶答案解析
- 2026年保定理工學(xué)院?jiǎn)握新殬I(yè)技能筆試模擬試題帶答案解析
- 2026年甘肅有色冶金職業(yè)技術(shù)學(xué)院高職單招職業(yè)適應(yīng)性測(cè)試參考題庫(kù)有答案解析
- 2026年四川科技職業(yè)學(xué)院?jiǎn)握新殬I(yè)技能考試參考題庫(kù)附答案詳解
- 碳中和認(rèn)證代理協(xié)議(企業(yè))2025年法律依據(jù)
- 中山大學(xué)研究生因公臨時(shí)出國(guó)境申報(bào)表
- 合同能源管理培訓(xùn)講義
- 剪映電腦版使用說明教程
- 腱鞘囊腫日間手術(shù)
- 標(biāo)準(zhǔn)化預(yù)制梁場(chǎng)驗(yàn)收表
- YY/T 0127.18-2016口腔醫(yī)療器械生物學(xué)評(píng)價(jià)第18部分:牙本質(zhì)屏障細(xì)胞毒性試驗(yàn)
- LY/T 2677-2016油茶整形修剪技術(shù)規(guī)程
- JJG 30-2012通用卡尺
- GB/T 8924-2005纖維增強(qiáng)塑料燃燒性能試驗(yàn)方法氧指數(shù)法
- 山東鐵路基床填筑工程監(jiān)理細(xì)則
- 集體教學(xué)活動(dòng)中有效提問和回應(yīng)課件
評(píng)論
0/150
提交評(píng)論