作者gecer (gecer)
看板Visual_Basic
标题[VB6 ] SetParent 使用方式
时间Sat Dec 2 23:51:11 2017
小定想在应用程式上嵌入一个视窗 挡掉部分按键防止被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
请问板大建议如何防止图形被干扰
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 122.121.30.146
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Visual_Basic/M.1512229873.A.EB7.html
1F:推 chinoyan: Try Form1.Refresh 12/04 14:47