天天看點

用控件僅一條指令實作界面換膚和多語言版本(YFSkins)

這一段時間做程式,一直在做界面方面的工作,剛開始是簡單的貼圖操作,後來感覺不通用,代碼重用性不好,并且要做很多基本工作(要在界面上添加圖檔,此外還要設定疊放順序)。後來,把它封裝成類,代碼重用性提高了,可是界面上還要自己添好多控件,此外窗體變化和放縮,也得添好多代碼。後來突然想到VB可以實作控件的自動添加,一試,果然好使,後來有把一些事件也內建到類中了。

目前又把類封裝成了控件,使用更加簡單了,僅需一條指令就可完成界面換膚和多語言版本

     Private Sub Form_Load()
           YFSkin1.SkinInit Me   '僅需這一行代碼
        
     End Sub           

這是我已經設計好的幾個界面截圖(皮膚和語言檔案可自定義,可無限擴充)

控件使用源碼下載下傳位址:

http://www.sky-walker.com.cn/yefan/yfskins.rar

不過很可惜,不能适應菜單,有時間再完善它。目前又添加了幾個皮膚。

繼續閱讀