- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]PAN 添加名称和关闭按钮及单击事件 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=107556)
-- 发布时间：2017/9/30 10:44:00
-- [求助]PAN 添加名称和关闭按钮及单击事件
老师，
如何添加名称和关闭按钮及单击事件
Dim pan As WinForm.Panel
pan=e.Form.CreateControl("p1",ControlTypeEnum.Panel)
\'问题1 pan.text=DataTables("表C").Datarows(0)("测试")
pan.BackColor=Color.red
pan.TopMost=True
e.Form.Controls("Panel1").AddControl(pan)
问题二
添加按钮
此主题相关图片如下：qq图片20170930104208.png
问题三
添加关闭按钮对应事件
此主题相关图片如下：qq图片20170930104308.png
例子
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:复件.foxdb |
[此贴子已经被作者于2017/9/30 10:44:43编辑过]
-- 发布时间：2017/9/30 11:53:00
--
问题1、panel没有text属性，在panel里面增加一个标签使用
2、在panel里面增加一个按钮使用
3、
方法一：动态绑定事件：http://www.foxtable.com/webhelp/scr/2374.htm
方法二：使用窗口全局事件：http://www.foxtable.com/webhelp/scr/1920.htm
-- 发布时间：2017/10/7 17:00:00
--
老师，
能否给做个例子，不会弄啊。
-- 发布时间：2017/10/7 17:05:00
--
参考
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=73085&skin=0
-- 发布时间：2017/10/7 17:20:00
--
老师，
下面代码是否适用 PAN 面板呢
\'处理按钮点击事件
Protected Overrides Sub OnClick(ByVal e As System.EventArgs)
Functions.Execute("项目_MainPages_CloseClick")
End Sub
-- 发布时间：2017/10/7 17:23:00
--
你要这样做：用代码 添加一个panel，然后，在panel里面添加一个图片/按钮控件，然后编写窗口的click事件，如果点击了panel的按钮，那就执行对应的操作。
-- 发布时间：2017/10/13 20:25:00
--
老师，
这块怎么写？
此主题相关图片如下：qq图片20171013202359.png
Dim pan As WinForm.Panel
pan=e.Form.CreateControl("p1",ControlTypeEnum.Panel)
\'问题1 pan.text=DataTables("表C").Datarows(0)("测试")
pan.BackColor=Color.red
pan.TopMost=True
e.Form.Controls("Panel1").AddControl(pan)
vars("窗口") = e.Form.panel
e.Form.panel.Controls.add(_SysCloseBut)
Dim mp As Windows.Forms.Panel=E.FORM.CONTROLS("P1").BaseControl
mp.Padding = New Point(_SysCloseBut.width,6)
AddHandler mp.Paint, AddressOf MainPages_Paint
此主题相关图片如下：qq图片20171013202359.png-- 发布时间：2017/10/13 20:38:00
--
没看懂你要做什么，用文字描述一下
-- 发布时间：2017/10/13 20:52:00
--
老师，
想要加一个关闭按钮，不会弄，按照例子弄得，烦您给看下
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:pan关闭按钮.table |
-- 发布时间：2017/10/13 21:47:00
--
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:pan关闭按钮.table |