VB如何使窗口半透明(滚全透明),控件不透明?
展开全部
没有直接的办法的做法是用2个窗口来模拟:
1:用一个窗口A做背景,不放控件,设置为半透明(用API SetLayeredWindowAttributes)
2:窗口B上放控件,然后计算所有控件的Region(CreateRectRgn、CombineRgn),然后SetWindowRgn将窗口没控件的地方镂空
3:把窗口B覆盖在A上,并随A移动
代码比较多,这里就不贴了,你网上搜一下,有不少的
1:用一个窗口A做背景,不放控件,设置为半透明(用API SetLayeredWindowAttributes)
2:窗口B上放控件,然后计算所有控件的Region(CreateRectRgn、CombineRgn),然后SetWindowRgn将窗口没控件的地方镂空
3:把窗口B覆盖在A上,并随A移动
代码比较多,这里就不贴了,你网上搜一下,有不少的
追问
我还没这么厉害,特别是API
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询