以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  窗口上添加图片,图片上透明部分在窗体上也是透明的  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=58418)

--  作者:sjzsdu
--  发布时间:2014/10/16 13:35:00
--  窗口上添加图片,图片上透明部分在窗体上也是透明的
各位大侠:
我要在窗口上添加图片,图片上透明部分在窗体上也是透明的。

附件一位我做的图片,除了文字部分,其余都是透明的

附件二,是panel控件上显示的情况
加载窗体后的代码
Dim pn As WinForm.Panel = e.Form.Controls("Panel1")
If Tables("客户").current("锁定状态")="批准锁定"  Then
pn.basecontrol.BackgroundImageLayout=ImageLayout.Zoom
pn.basecontrol.BackgroundImage=GetImage("ywysuoding.png")
Else
pn.basecontrol.BackgroundImageLayout=ImageLayout.Zoom
pn.basecontrol.BackgroundImage=Nothing
End If

图片点击可在新窗口打开查看此主题相关图片如下:16133004.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:qq 6133223.png
图片点击可在新窗口打开查看


--  作者:狐狸爸爸
--  发布时间:2014/10/16 14:06:00
--  
你的问题是什么?
--  作者:Bin
--  发布时间:2014/10/16 14:07:00
--  
要用图片控件,才可以透明看到下面.
--  作者:sjzsdu
--  发布时间:2014/10/16 14:35:00
--  
Dim pn As WinForm.PictureBox = e.Form.Controls("PictureBox1")
If Tables("客户").current("锁定状态")="批准锁定"  Then

pn.Image=GetImage("ywysuoding.png")
Else
pn.basecontrol.BackgroundImageLayout=ImageLayout.Zoom
pn.basecontrol.BackgroundImage=Nothing
End If


图片点击可在新窗口打开查看此主题相关图片如下:用picturebox.png
图片点击可在新窗口打开查看


用picturebox 也是这样的

--  作者:有点甜
--  发布时间:2014/10/16 14:39:00
--  
 是不可能跨域不同控件显示透明的。