Foxtable(狐表)用户栏目专家坐堂 → [求助]定义的窗口控件事件


  共有2654人关注过本帖树形打印复制链接

主题:[求助]定义的窗口控件事件

帅哥哟,离线,有人找我吗?
linswcfr
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:593 积分:5354 威望:0 精华:0 注册:2011/9/30 8:42:00
[求助]定义的窗口控件事件  发帖心情 Post By:2015/9/28 11:54:00 [只看该作者]

Dim ct As New Windows.Forms.Button
ct
.Text = "我的按钮"
e
.Form.Panel.Controls.Add(ct)

 

定义的第三方控件click事件

可以写窗口全局事件吗

要怎么写


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/9/28 12:20:00 [只看该作者]

可以,直接在click事件写

 

If e.Sender.Name = "我的按钮" OrElse e.Sender.Text = "我的按钮" Then

    msgbox("123456")

End If


 回到顶部
帅哥哟,离线,有人找我吗?
linswcfr
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:593 积分:5354 威望:0 精华:0 注册:2011/9/30 8:42:00
  发帖心情 Post By:2015/9/28 13:48:00 [只看该作者]

没有效果!?


 回到顶部
帅哥哟,离线,有人找我吗?
linswcfr
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:593 积分:5354 威望:0 精华:0 注册:2011/9/30 8:42:00
  发帖心情 Post By:2015/9/28 13:50:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目2.foxdb


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/9/28 14:11:00 [只看该作者]

 

 

http://www.foxtable.com/help/topics/1409.htm

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目2.foxdb


 回到顶部
帅哥哟,离线,有人找我吗?
linswcfr
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:593 积分:5354 威望:0 精华:0 注册:2011/9/30 8:42:00
  发帖心情 Post By:2015/9/28 14:21:00 [只看该作者]

动态控件,怎么加添加图标

btn.Image = getimage("add.gif")
btn.TextImageRelation =TextImageRelation.ImageBeforeText

 

没效果?

 


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/9/28 14:31:00 [只看该作者]

路径没写对

 

Dim btn As WinForm.Button
btn = e.Form.CreateControl("我的按钮", ControlTypeEnum.Button)
btn.Text = "我的按钮"
btn.Image = getimage("d:\001.ico")
btn.TextImageRelation =TextImageRelation.ImageBeforeText
e.Form.AddControl(btn)


 回到顶部
帅哥哟,离线,有人找我吗?
linswcfr
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:593 积分:5354 威望:0 精华:0 注册:2011/9/30 8:42:00
  发帖心情 Post By:2015/9/28 14:44:00 [只看该作者]

谢谢 大红袍


 回到顶部