以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何设计一个软件,没有菜单的??  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=29132)

--  作者:fengyungongzi
--  发布时间:2013/2/28 13:10:00
--  如何设计一个软件,没有菜单的??
如何设计一个软件,没有菜单的??程序执行后,就是能独立弹出一个窗口,所有的操作,通过窗口的按钮去实现,例如一个简单的通讯录,界面。
--  作者:fengyungongzi
--  发布时间:2013/2/28 13:52:00
--  

有高手在吗??帮一下忙啊

 


--  作者:lsy
--  发布时间:2013/2/28 13:54:00
--  

发错地方了。

 

 

[此贴子已经被作者于2013-2-28 13:54:42编辑过]

--  作者:fengyungongzi
--  发布时间:2013/2/28 13:56:00
--  
应该发哪啊
--  作者:狐狸爸爸
--  发布时间:2013/2/28 14:02:00
--  

可以看看:

 

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

 


--  作者:程兴刚
--  发布时间:2013/2/28 14:02:00
--  
启动时打开的第一个窗口用模式窗口,您搜索一下论坛,还有代码方法,前几天老朱刚刚回复一个!
--  作者:lsy
--  发布时间:2013/2/28 14:03:00
--  

不但菜单不见,表也不见了,而且主窗口始终可见,不管你的代码选择哪张表。

 

AfterOpenProject中

For Each t As RibbonMenu.Tab In RibbonTabs
    t.Visible = (User.Type = UserTypeEnum.Developer)
Nex

 

TableCaptionVisible = (User.Type = UserTypeEnum.Developer)
Forms("主窗口").OpenTo(CurrentTable.Name)

 

LoadUserSetting

For Each t As RibbonMenu.Tab In RibbonTabs
    t.Visible = (User.Type = UserTypeEnum.Developer)
Nex

 

TableCaptionVisible = (User.Type = UserTypeEnum.Developer)


 

MainTableChanged

Forms("主窗口").OpenTo(CurrentTable.Name)

 

 

[此贴子已经被作者于2013-2-28 14:05:54编辑过]