Re: [VB6 ] SetParent 使用方式

看板Visual_Basic作者 (gecer)時間7年前 (2017/12/05 22:06), 編輯推噓0(000)
留言0則, 0人參與, 最新討論串2/2 (看更多)
※ 引述《gecer (gecer)》之銘言: : 小定想在應用程式上嵌入一個視窗 擋掉部分按鍵防止被user點到 小弟做法如下 用VB6 : 創建form 設為應用程式的child windows : Private Sub Form_Load() : Locked = False : LockedFormName = InputBox("Input the Form would be locked", "Mask-0.1") : LockedProberMaskWhnd = Me.hWnd : LockedFormNameWhnd = FindWindow(vbNullString, LockedFormName) : If LockedFormNameWhnd = 0 Then : MsgBox "Not Found" : End : End If : SetParent LockedMaskWhnd, LockedFormNameWhnd : End Sub : ============================================================================== : 其中LockedMaskWhnd 為vb6 創建的form , LockedFormNameWhnd 是 findwindow get的 : 應用程式的handle 上面這一段code成功嵌進form 但是圖形卻被應用程式干擾(下圖黑框 : 部分) : https://imgur.com/a/ZqLhF : 請問板大建議如何防止圖形被干擾 小弟發現用 "hWndForm = CreateWindowEx(0, "Mask", "MaskForm", WS_CLIPCHILDREN, ParentForm.Left + P_Left_Offset, ParentForm.Right + P_Top_Offset, P_Width, P_Height, hWndParentForm, 0, App.hInstance, ByVal 0&)" 利用win32的 windows form 了話 就不會被干擾 (不過也沒嵌進去parent form就是了) 雖然解決此問題 但是不知道原因 -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 122.121.28.242 ※ 文章網址: https://www.ptt.cc/bbs/Visual_Basic/M.1512482787.A.C71.html
文章代碼(AID): #1Q9gVZnn (Visual_Basic)
討論串 (同標題文章)
本文引述了以下文章的的內容:
完整討論串 (本文為第 2 之 2 篇):
文章代碼(AID): #1Q9gVZnn (Visual_Basic)