以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]想问问这个只显示图片的窗口怎么做出来的?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=141303)

--  作者:zto001
--  发布时间:2019/9/26 9:41:00
--  [求助]想问问这个只显示图片的窗口怎么做出来的?
http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=50428&page=2
[求助]想问问这个只显示图片的窗口怎么做出来的?
我按照他的代码写过去,打开窗口什么都不见了。能否告知下原理

--  作者:有点蓝
--  发布时间:2019/9/26 10:20:00
--  
独立窗口,窗口背景颜色设置为和图片的背景颜色一致,实例是白色white。

添加图片控件,停靠fill,控件窗口背景颜色设置为和图片的背景颜色一致,实例是白色white。添加图片

窗口afterload

e.Form.BaseForm().TransparencyKey = Color.White ‘把窗口透明色设置为和背景色一致
\'e.Form.BaseForm.Opacity = 0 ‘如果单独测试窗口,把这一句代码去掉’
e.Form.BaseForm.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None  \'消除窗口的边框
myform = e.Form.BaseForm
Dim dc As Foxtable.FormPanel = e.Form.Panel         \'窗口底层
AddHandler dc.MouseMove, AddressOf myform_MouseMove  \'进入控件事件
AddHandler dc.MouseDown, AddressOf myform_MouseDown   \'按下鼠标事件

--  作者:237756360
--  发布时间:2021/3/23 8:24:00
--  
学习一下