Question

vb SetParent不能操作 透明窗体，怎么办

我在父窗口 用form2.show 显示半透明的form2
然后用call SetParent(form2.hwnd,picture1.hwnd) 移到图框里，form2就完全看不见了

如果去掉 SetParent(form2.hwnd,me.hwnd)
form2就能正常显示为半透明

这是什么原因呀，各位高手帮下我呀

Answer 1

这种事情的想法，因为你的目的是为了API编程，那么我相信你应该能够理解我说的实际操作。
图片上的控制，使控制不透明或透明的方法是控制是透明的。
SetLayeredWindowAttributes是体内控制窗口透明的，你想单独控制不透明的，其思想的问题。
应该怎么办呢？
只控制使用的一种形式。 。这是什么意思呢？您可以编写自己的控件（只写自己的控件做的操作），然后在代码中添加相应的透明的代码，让你触发控件的事件被触发时，透明的代码。控件将按照您的要求，透明或不透明的。 。 。
另外，房东透明的代码的麻烦。 。 。
有我精：
常量LWA_CO??LORKEY =＆H1
常量LWA_ALPHA =＆H2
常量GWL_EXSTYLE =（-20）
CONST WS_EX_LAYERED =＆H80000
私有函数GetWindowLong库“USER32”别名吗？“GetWindowLongA”（BYVAL HWND作为龙'参数nIndex，只要）由于长期
私有函数SetWindowLong函数库“USER32”别名吗？“SetWindowLongA”（BYVAL HWND，只要BYVAL参数nIndex，只要，只要'dwNewLong），只要
私人函数SetLayeredWindowAttributes库“USER32”（BYVAL HWND作为龙'crKey字节'dwFlags中，只要长，BYVAL bAlpha）长...... />私人小组Form_Load（）
昏暗的惩戒，只要
RET = GetWindowLong（Me.hWnd，GWL_EXSTYLE）
RET = RET或WS_EX_LAYERED
SetWindowLong函数Me.hWnd，GWL_EXSTYLE，惩戒
形式透明度设置为128（0255）
SetLayeredWindowAttributes Me.hWnd，0，128，LWA_ALPHA
END SUB

Answer 2

是不是没有把Form2移到Picture1的可见范围内？用完SetParent后再运行下面一句试试：
Form2.Move 0, 0

追问

已经移了的，不是这个问题，谁能给想个办法呀！！我头都破了