[求助]窗口控件 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

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

共有2822人关注过本帖树形打印复制链接主题：[求助]窗口控件

blsu33

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2927 积分：20161 威望：0 精华：0 注册：2012/2/3 17:45:00

[求助]窗口控件 发帖心情

Post By：2018/1/17 10:22:00 [只看该作者]

老师，

如图这块控件是什么？带....是Panel 加的图片？

此主题相关图片如下：qq图片20180117102241.png

有点甜

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2018/1/17 10:41:00 [只看该作者]

1、可能是【状态栏】http://www.foxtable.com/webhelp/scr/3118.htm

2、也可以是图片，看你喜欢。

blsu33

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2927 积分：20161 威望：0 精华：0 注册：2012/2/3 17:45:00

Post By：2018/2/22 15:43:00 [只看该作者]

老师，

定义工具栏单click事件如何定义

Public Sub Strip_Click(ByVal sender As Object, ByVal e As EventArgs)

Functions.Execute("za_nb_Stripclick", sender,e)

End Sub

AddHandler Strip.ItemClick, AddressOf Strip_Click

此主题相关图片如下：qq图片20180222154249.png

有点甜

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2018/2/22 15:53:00 [只看该作者]

如果是foxtable的窗口，不需要定义事件，直接用全局事件即可

http://www.foxtable.com/webhelp/scr/3112.htm

blsu33

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2927 积分：20161 威望：0 精华：0 注册：2012/2/3 17:45:00

Post By：2018/2/22 16:00:00 [只看该作者]

老师，

窗口上有PANL，想要加到PANL中去，还有NEW 的窗口，如何自定义添加？

有点甜

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2018/2/22 16:03:00 [只看该作者]

如果确实要绑定，就这样写，如

Dim cd As System.Windows.Forms.ToolStripMenuItem = e.form.strips("主菜单").items("项目1").items("项目1").basecontrol
AddHandler cd.click, AddressOf Strip_Click

blsu33

小大 7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2927 积分：20161 威望：0 精华：0 注册：2012/2/3 17:45:00

Post By：2018/2/22 16:26:00 [只看该作者]

哦好了

[此贴子已经被作者于2018/2/22 16:31:58编辑过]

有点甜

小大 8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2018/2/22 16:32:00 [只看该作者]

那你就根据提示改呗，不是很明显了？

Dim cd As System.Windows.Forms.ToolStripButton = e.form.strips("工具栏1").items("New").basecontrol

blsu33

小大 9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2927 积分：20161 威望：0 精华：0 注册：2012/2/3 17:45:00

Post By：2018/2/22 22:18:00 [只看该作者]

老师，

如何定义一个strips 然后添加到PANL中呢？例如下面的都是错误

Dim p As WinForm.Panel=FormS(dr("ckname")).controls("pnl_cz_" & frmname & "_" & dr("id"))

Dim Striptab As System.Windows.Forms.ToolStripMenuItem

Striptab.Name = "Strip_" & p.Name.Trim("p","g","_")

P.basecontrol.controls.add(Striptab)

有点甜

小大 10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2018/2/22 22:28:00 [只看该作者]

如

Dim Strip As WinForm.Strip
Strip = e.Form.Strips.Add("工具栏1", StripTypeEnum.ToolBar)
Strip.Items.Add("New", "新建", "new.ico", StripItemTypeEnum.Button)
Strip.Items.Add("Open", "打开", "Open.ico", StripItemTypeEnum.Button)
Strip.Items.Add("Save", "保存", "Save.ico", StripItemTypeEnum.Button)
Strip.Items.Add("Print", "打印", "Print.ico", StripItemTypeEnum.Button)
Strip.Items.Add("Separator1", "分割条", "", StripItemTypeEnum.Separator)
Strip.Items.Add("Cut", "剪切", "Cut.ico", StripItemTypeEnum.Button)
Strip.Items.Add("Copy", "复制", "Copy.ico", StripItemTypeEnum.Button)
Strip.Items.Add("Brush", "格式刷", "Brush.ico", StripItemTypeEnum.Button)
Strip.Items.Add("Separator2", "分割条", "", StripItemTypeEnum.Separator)
Strip.Items.Add("Help", "帮助", "Help.ico", StripItemTypeEnum.Button)

e.form.controls("panel1").basecontrol.controls.add(strip.basecontrol)

下一主题 >> << 上一主题

总数 26 1 2 3 下一页

主题：[求助]窗口控件