| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 565 人关注过本帖
标题:又出现了新问题
只看楼主 加入收藏
ptyy803
Rank: 2
来 自:上海
等 级:论坛游民
威 望:2
帖 子:193
专家分:64
注 册:2009-6-11
结帖率:100%
收藏
已结贴  问题点数:20 回复次数:9 
又出现了新问题
gzgl系统完全编好执行EXE文件出现了一个新问题,就是在菜单里执行一个菜单文件后,其他的菜单文件不能执行,现在我是全部可以执行,在一个菜单文件还没有退出前照样可以执行另外一个菜单文件,我要的是只能操作一个菜单文件,其他的菜单是暗色的,等当前的菜单文件退出后,菜单才变亮可以继续执行其他的菜单文件。
搜索更多相关主题的帖子: 文件 菜单 
2012-08-26 13:58
bccn201203
Rank: 9Rank: 9Rank: 9
等 级:蜘蛛侠
威 望:3
帖 子:680
专家分:1140
注 册:2012-3-14
收藏
得分:0 
将当前窗口中的表单的 WINDOWTYPE=1 也就是说设置为模式表单
2012-08-26 14:25
ptyy803
Rank: 2
来 自:上海
等 级:论坛游民
威 望:2
帖 子:193
专家分:64
注 册:2009-6-11
收藏
得分:0 
是1啊,也就是所有的菜单文件中,一次只能执行一个菜单文件

[ 本帖最后由 ptyy803 于 2012-8-26 14:40 编辑 ]
2012-08-26 14:37
hu9jj
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:红土地
等 级:贵宾
威 望:400
帖 子:11857
专家分:43421
注 册:2006-5-13
收藏
得分:0 
在表单的loac事件中加一行:
set skip of menu _msysmenu .t.
同时还要在unload事件中加一行:
set skip of menu _msysmenu .f.
否则退出表单后菜单也不能用。

活到老,学到老!http://www.(该域名已经被ISP盗卖了)E-mail:hu-jj@
2012-08-26 15:58
ptyy803
Rank: 2
来 自:上海
等 级:论坛游民
威 望:2
帖 子:193
专家分:64
注 册:2009-6-11
收藏
得分:0 
根据4楼的方法不行,不过我已经解决啦,我用设置一个系统变量xSysMenu=.F.,在一个 表单文件的init中为xSysMenu=.F.,D而是他Destroy中设置为xSysMenu=.T.,再在菜单文件的每一个菜单的“跳过”一栏中写进 xSysMenu=.F. ,这样就完全解决了问题,不过还是要谢谢上面的朋友给了我的提示。
2012-08-27 20:02
hu9jj
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:红土地
等 级:贵宾
威 望:400
帖 子:11857
专家分:43421
注 册:2006-5-13
收藏
得分:0 
4楼的方法是可行的,也许是楼主的菜单名称不一样,换个菜单名称肯定能行。不过楼主的方法也是同样效果,也可以解决问题。

活到老,学到老!http://www.(该域名已经被ISP盗卖了)E-mail:hu-jj@
2012-08-27 20:39
ptyy803
Rank: 2
来 自:上海
等 级:论坛游民
威 望:2
帖 子:193
专家分:64
注 册:2009-6-11
收藏
得分:0 
谢谢你的高抬。你指的菜单名是什么?是set skip of menu _msysmenu .t.中的menu吗?我的菜单文件名是Gzmenu.mpr,是不是换写成 set skip of Gzmenu _msysmenu .t. 还是换写成 set skip of menu Gzmenu .t.

[ 本帖最后由 ptyy803 于 2012-8-27 21:37 编辑 ]
2012-08-27 21:33
hu9jj
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:红土地
等 级:贵宾
威 望:400
帖 子:11857
专家分:43421
注 册:2006-5-13
收藏
得分:20 
下面是帮助文件中的信息:
SET SKIP OF 命令

允许或禁止用户自定义菜单或 Microsoft Visual FoxPro 系统菜单的某个菜单、菜单栏、菜单标题或菜单项。此处是语法的多个版本。

 
SET SKIP OF MENU MenuBarName1 lExpression1
 
 
SET SKIP OF PAD MenuTitleName OF MenuBarName2 lExpression2
 
 
SET SKIP OF POPUP MenuName1 lExpression3
 
 
SET SKIP OF BAR nMenuItemNumber | SystemItemName OF MenuName2
      lExpression4
 

参数
MENU MenuBarName1lExpression1

允许或禁止 Visual FoxPro 系统菜单栏或由 DEFINE MENU 创建的用户自定义菜单栏。例如,Visual FoxPro 系统菜单栏 _MSYSMENU 可以通过这个命令废止:   复制代码
SET SKIP OF MENU _MSYSMENU .T.
 
它可以通过这个命令激活:  复制代码
SET SKIP OF MENU _MSYSMENU .F.
 

按照上面的解释,似乎应该为:
SET SKIP OF MENU Gzmenu .t.
但我没有测试,不知正确否。

这个命令在使用VFP系统窗口中的菜单没有问题,而在使用顶层表单作主窗口时的菜单却没有成功,我没有去深究原因,也是换了类似楼主的方式解决的。

活到老,学到老!http://www.(该域名已经被ISP盗卖了)E-mail:hu-jj@
2012-08-28 07:41
ptyy803
Rank: 2
来 自:上海
等 级:论坛游民
威 望:2
帖 子:193
专家分:64
注 册:2009-6-11
收藏
得分:0 
我是顶层表单作主窗口的菜单,这样的方法不行,还是用设置系统变量来定义是否使用和废除的方法,不过还是要谢谢8楼。
还有个问题,怎样设置在一输入框上设置当鼠标移到输入框时就显示该输入框的信息,类似下图:
图片附件: 游客没有浏览图片的权限,请 登录注册


[ 本帖最后由 ptyy803 于 2012-8-28 20:09 编辑 ]
2012-08-28 20:02
taifu945
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:80
帖 子:1545
专家分:3298
注 册:2012-7-6
收藏
得分:0 
以下是引用ptyy803在2012-8-28 20:02:28的发言:

我是顶层表单作主窗口的菜单,这样的方法不行,还是用设置系统变量来定义是否使用和废除的方法,不过还是要谢谢8楼。
还有个问题,怎样设置在一输入框上设置当鼠标移到输入框时就显示该输入框的信息,类似下图:
此事易尔:先把表单的ShowTips属性设为.T.,然后在文本框或编辑框的ToolTipText中输入你想要提示的文字即可。当运行表单时,就能出现你说的效果了。不过,ToolTipText属性中的提示文字最多容纳127个英文字符,若为全中文,则是63个汉字。
2012-08-29 20:08
快速回复:又出现了新问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.018171 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved