以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]关闭表标题显示出错(开发版)  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=62557)

--  作者:瞩望星空
--  发布时间:2015/1/4 15:33:00
--  [求助]关闭表标题显示出错(开发版)
打开项目时,为何用管理员身份第一次进入项目时,还是会显示表标题?
后面几次,或从其他用户切换过来就正常(不显示表标题)
代码放在项目属性的“LoadUserSetting”事件中。

If User.Type = UserTypeEnum.Developer Then
    TableCaptionVisible = True
Else
    TableCaptionVisible = False
    \'MessageBox.Show(User.Type)   \'测试用户类型
End If
Syscmd.Project.OpenUserMenu()    
Forms("主窗口").Open
MainTable = Tables("main")

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:测试标题显示.foxdb



--  作者:Bin
--  发布时间:2015/1/4 15:44:00
--  
很奇怪,一下子找不到原因,你把代码复制一份到ALterOpenProject事件吧
--  作者:瞩望星空
--  发布时间:2015/1/4 16:49:00
--  
在“ALterOpenProject”设置一次后正常了。

但是在“LoadUserSetting”事件测试中,明明是执行了
    TableCaptionVisible = False

奇怪

--  作者:Bin
--  发布时间:2015/1/4 16:53:00
--  
是执行了,如果一直加入messagebox.show 每个事件都加入,可以清晰看到,设置了隐藏,是成功了的,但是之后又被显示出来了.

检查了一下,没有发现你有设置显示的代码. 可能是狐表内部初始化导致的.  

--  作者:有点甜
--  发布时间:2015/1/4 16:53:00
--  
 顺序问题。先执行了 LoadUserSetting 再执行 Afteropenproject 的。
--  作者:瞩望星空
--  发布时间:2015/1/4 17:33:00
--  
但是1楼的项目文件中,没有设置“Afteropenproject”代码啊。
--  作者:有点甜
--  发布时间:2015/1/4 17:38:00
--  
 AfterOpenProject之前的设置,是无效的。
--  作者:瞩望星空
--  发布时间:2015/1/4 17:40:00
--  
哦,那就把设置代码移一下位置,放在“Afteropenproject”中。