以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  窗口菜单栏  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=86375)

--  作者:blackzhu
--  发布时间:2016/6/16 11:25:00
--  窗口菜单栏
 e.Form.Strips.Clear()
        Dim Strip As WinForm.Strip
        Strip = e.Form.Strips.Add("工具栏1", StripTypeEnum.ToolBar)
        Strip.BaseControl.dock = Windows.Forms.DockStyle.Fill
        e.Form.Controls("Panel1").basecontrol.controls.Add(Strip.BaseControl)
        Dim Products() As String = "生成,查询,删除,清除,下载,退出".Split(",")
        For i As Integer = 0 To Products.Length - 1
            Strip.Items.Add(Products(i), Products(i), Products(i) & ".ico", StripItemTypeEnum.Button)
        Next

 我需要同时显示控件标题以及图标 图标在标题的上面,怎么改这个? 还有图标的大小
[此贴子已经被作者于2016/6/16 11:29:25编辑过]

--  作者:逛逛
--  发布时间:2016/6/16 11:43:00
--  
工具栏就是一个标准的 ToolStrip 控件,你用他的属性,爱怎么捣腾都行
--  作者:大红袍
--  发布时间:2016/6/16 11:46:00
--  

vs里面,弄一个窗口,弄一个工具栏控件,随便设置,然后看生成的代码。

 

在foxtable里  Strip.BaseControl 就是这个工具栏控件。


--  作者:blackzhu
--  发布时间:2016/6/16 11:52:00
--  
哦 那行吧