以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 有没有类似于工具栏的解决方案 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=85966) |
-- 作者:rjh4078 -- 发布时间:2016/6/7 8:27:00 -- 有没有类似于工具栏的解决方案 随着窗口数量越来越多 在每个窗口添加按钮 写代码 刚开始没问题 现在发现一旦要修改 工作量就巨大了
|
-- 作者:rjh4078 -- 发布时间:2016/6/7 8:39:00 -- 因为我每个窗口都相对独立 如果使用公用窗口 如何将这个公用窗口插入到对应的独立窗口中? |
-- 作者:Hyphen -- 发布时间:2016/6/7 9:50:00 -- 参考,不过公用窗口也只能在一个独立窗口中出现 Forms("子窗口").OPEN(-1000,-1500) Forms("子窗口").baseform.Dock = Windows.Forms.DockStyle.Fill Forms("子窗口").baseform.TopLevel = False Forms("子窗口").baseform.FormBorderStyle = Windows.Forms.FormBorderStyle.None Dim pnl As WinForm.Panel = e.Form.Controls("Panel1") pnl.basecontrol.Controls.Clear() pnl.basecontrol.Controls.Add(Forms("子窗口").baseform) -------------------------------------- 子窗口必须设为独立窗口类型 |
-- 作者:rjh4078 -- 发布时间:2016/6/7 12:04:00 -- 谢谢 |