VFP 愛用者社區

[Ruey]

作者：藍狐 轉貼自：廣宇程序園
http://www.3552808.com/gy/dl/Article_Show.asp?ArticleID=73


　　看了網友在VFP7.0、VFP8.0中應用activeskin控件設計出的漂亮界面表單程序下載後，在VFP6.0中運行卻出現「找不到屬性HWND」的錯誤提示，什麼原因呢？原來從7.0後表單屬性增加了類似於VB中的窗口句柄屬性HWND。那用VFP6.0的用戶們就沒有希望了嗎？經返復捉摸，終於設計成功，在VFP6.0環境下應用activeskin的例程。



怎麼樣，還可以吧！設計要點如下：
　　1、新建一表單，並設置它的showwindow屬性為2－作為頂層表單。
　　2、添加activeskin控件，並命名為skin
　　3、添加按鈕控件，設置單擊代碼如下：
　　DECLARE INTEGER GetActiveWindow IN win32api　&&關鍵　獲取當前窗口句柄
　　HWND = GetActiveWindow()
　　thisform.skin.loadSkin(GETFILE())
　　thisform.skin.ApplySkin(hwnd)

註:VFP8也是可以的
下載點:
http://www.softshape.com/software/develop/