快捷菜单.mpr

可以有效管理员工的薪酬

*       *********************************************************
*       *                                                         
*       * 01/01/09            快捷菜单.MPR              19:49:36  
*       *                                                         
*       *********************************************************
*       *                                                         
*       * 罐头人工作室                                            
*       *                                                         
*       * 版权所有 (C) 2009 广东工业大学经济管理学院06人力三班   
*       * 迎龙路161号                                             
*       * 广州, 广东  邮编                                          
*       * 中国                                              
*       *                                                         
*       * 说明:                                            
*       * 此程序由 GENMENU 自动生成。    
*       *                                                         
*       *********************************************************


*       *********************************************************
*       *                                                         
*       *                         菜单定义                        
*       *                                                         
*       *********************************************************
*

DEFINE POPUP 快捷菜单 SHORTCUT RELATIVE FROM MROW(),MCOL()
DEFINE BAR 1 OF 快捷菜单 PROMPT "文件"
DEFINE BAR 2 OF 快捷菜单 PROMPT "编辑"
DEFINE BAR 3 OF 快捷菜单 PROMPT "工具"
DEFINE BAR 4 OF 快捷菜单 PROMPT "程序"
DEFINE BAR 5 OF 快捷菜单 PROMPT "帮助"
ON BAR 1 OF 快捷菜单 ACTIVATE POPUP 文件
ON BAR 2 OF 快捷菜单 ACTIVATE POPUP 编辑
ON BAR 3 OF 快捷菜单 ACTIVATE POPUP 工具
ON BAR 4 OF 快捷菜单 ACTIVATE POPUP 程序
ON BAR 5 OF 快捷菜单 ACTIVATE POPUP 帮助

DEFINE POPUP 文件 SHORTCUT RELATIVE
DEFINE BAR _mfi_new OF 文件 PROMPT "新建(\<N)..." ;
	KEY CTRL+N, "Ctrl+N" ;
	MESSAGE "创建新文件"
DEFINE BAR _mfi_open OF 文件 PROMPT "打开(\<O)..." ;
	KEY CTRL+O, "Ctrl+O" ;
	MESSAGE "打开已有文件"
DEFINE BAR _mfi_close OF 文件 PROMPT "关闭(\<C)" ;
	MESSAGE "关闭当前文件"
DEFINE BAR _mfi_clall OF 文件 PROMPT "全部关闭" ;
	MESSAGE "全部关闭窗口"
DEFINE BAR _mfi_save OF 文件 PROMPT "保存(\<S)" ;
	KEY CTRL+S, "Ctrl+S" ;
	MESSAGE "保存当前改动了的文件"
DEFINE BAR _mfi_savas OF 文件 PROMPT "另存为(\<A)..." ;
	MESSAGE "用新文件名保存当前改动了的文件"
DEFINE BAR _mfi_sysprint OF 文件 PROMPT "打印(\<P)..." ;
	KEY CTRL+P, "Ctrl+P" ;
	MESSAGE "打印一个文本文件，报表，标签、命令窗口的内容或剪贴板上的内容"
DEFINE BAR _mfi_quit OF 文件 PROMPT "退出(\<X)" ;
	MESSAGE "退出 Visual FoxPro"

DEFINE POPUP 编辑 SHORTCUT RELATIVE
DEFINE BAR _med_undo OF 编辑 PROMPT "撤消(\<U)" ;
	KEY CTRL+Z, "Ctrl+Z" ;
	MESSAGE "撤消上一次命令或操作"
DEFINE BAR _med_redo OF 编辑 PROMPT "重做(\<D)" ;
	KEY CTRL+R, "Ctrl+R" ;
	MESSAGE "重复上一次命令或操作"
DEFINE BAR _med_cut OF 编辑 PROMPT "剪切(\<T)" ;
	KEY CTRL+X, "Ctrl+X" ;
	MESSAGE "移去选定内容并将其放入剪贴板"
DEFINE BAR _med_copy OF 编辑 PROMPT "复制(\<C)" ;
	KEY CTRL+C, "Ctrl+C" ;
	MESSAGE "将选定内容复制到剪贴板上"
DEFINE BAR _med_paste OF 编辑 PROMPT "粘贴(\<P)" ;
	KEY CTRL+V, "Ctrl+V" ;
	MESSAGE "粘贴剪贴板上的内容"
DEFINE BAR _med_slcta OF 编辑 PROMPT "全部选定(\<L)" ;
	KEY CTRL+A, "Ctrl+A" ;
	MESSAGE "选定当前窗口中的所有文本或数据项"
DEFINE BAR _med_find OF 编辑 PROMPT "查找(\<F)..." ;
	KEY CTRL+F, "Ctrl+F" ;
	MESSAGE "搜索指定文本"

DEFINE POPUP 工具 SHORTCUT RELATIVE
DEFINE BAR _mtl_optns OF 工具 PROMPT "选项(\<O)..." ;
	MESSAGE "更改 Visual FoxPro 选项的各种分类"
DEFINE BAR _mvi_toolb OF 工具 PROMPT "工具栏(\<T)..." ;
	MESSAGE "显示、隐藏或定制工具栏"
DEFINE BAR _mtl_wzrds OF 工具 PROMPT "向导(\<W)" ;
	MESSAGE "运行选定的向导"
DEFINE BAR _mtl_spell OF 工具 PROMPT "拼写检查(\<S)..." ;
	MESSAGE "检查拼写错误"

DEFINE POPUP 程序 SHORTCUT RELATIVE
DEFINE BAR _mpr_do OF 程序 PROMPT "运行(\<D)..." ;
	KEY CTRL+D, "Ctrl+D" ;
	MESSAGE "运行一个程序、应用程序、表单、报表、查询或菜单"
DEFINE BAR _mpr_cancl OF 程序 PROMPT "取消(\<C)" ;
	MESSAGE "停止运行当前程序"
DEFINE BAR _mpr_resum OF 程序 PROMPT "继续执行(\<R)" ;
	KEY CTRL+M, "Ctrl+M" ;
	MESSAGE "继续运行当前挂起的程序"
DEFINE BAR _mpr_suspend OF 程序 PROMPT "挂起(\<S)" ;
	MESSAGE "挂起当前正在运行的程序"
DEFINE BAR _mpr_compl OF 程序 PROMPT "编译(\<M)..." ;
	MESSAGE "编译当前程序或选定程序"

DEFINE POPUP 帮助 SHORTCUT RELATIVE
DEFINE BAR _mst_hpsch OF 帮助 PROMPT "Microsoft Visual FoxPro 帮助主题(\<V)" ;
	KEY F1, "F1" ;
	MESSAGE "以输入的关键字寻找帮助主题"
DEFINE BAR _helpwebvfpfreestuff OF 帮助 PROMPT "Microsoft on the Web(\<W)" ;
	MESSAGE "启动 web 浏览器以转到 Microsoft 的 Web 节点"
DEFINE BAR _helpwebmsfthomepage OF 帮助 PROMPT "Microsoft 主页(\<M)" ;
	MESSAGE "打开 Microsoft 主页"
DEFINE BAR _helpwebvsprodnews OF 帮助 PROMPT "Visual Studio 产品新闻" ;
	MESSAGE "打开 VStudio 主页"

ACTIVATE POPUP 快捷菜单