菜单.mpr

看了你们就知道拉

*       *********************************************************
*       *                                                         
*       * 10/29/04              菜单.MPR                17:16:05  
*       *                                                         
*       *********************************************************
*       *                                                         
*       * 作者名称                                                
*       *                                                         
*       * 版权所有 (C) 2004 公司名称                             
*       * 地址                                                    
*       * 城市,     邮编                                          
*       * 国家                                              
*       *                                                         
*       * 说明:                                            
*       * 此程序由 GENMENU 自动生成。    
*       *                                                         
*       *********************************************************


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

SET SYSMENU TO
SET SYSMENU AUTOMATIC

DEFINE PAD _1d7110f1d OF _MSYSMENU PROMPT "A进货管理" COLOR SCHEME 3 ;
	KEY ALT+A, "ALT+A"
DEFINE PAD _1d7110f1e OF _MSYSMENU PROMPT "B销售管理" COLOR SCHEME 3 ;
	KEY ALT+B, "ALT+B"
DEFINE PAD _1d7110f1f OF _MSYSMENU PROMPT "C库存管理" COLOR SCHEME 3 ;
	KEY ALT+C, "ALT+C"
DEFINE PAD _1d7110f1g OF _MSYSMENU PROMPT "D基本信息" COLOR SCHEME 3 ;
	KEY ALT+D, "ALT+D"
DEFINE PAD _1d7110f1h OF _MSYSMENU PROMPT "E系统设置" COLOR SCHEME 3 ;
	KEY ALT+E, "ALT+E"
DEFINE PAD _1d7110f1i OF _MSYSMENU PROMPT "H帮助" COLOR SCHEME 3 ;
	KEY ALT+H, "ALT+H"
DEFINE PAD _1d7110f1j OF _MSYSMENU PROMPT "X退出" COLOR SCHEME 3 ;
	KEY ALT+X, "ALT+X"
ON PAD _1d7110f1d OF _MSYSMENU ACTIVATE POPUP a进货管理
ON PAD _1d7110f1e OF _MSYSMENU ACTIVATE POPUP b销售管理
ON PAD _1d7110f1f OF _MSYSMENU ACTIVATE POPUP c库存管理
ON PAD _1d7110f1g OF _MSYSMENU ACTIVATE POPUP d基本信息
ON PAD _1d7110f1h OF _MSYSMENU ACTIVATE POPUP e系统设置
ON PAD _1d7110f1i OF _MSYSMENU ACTIVATE POPUP h帮助
ON PAD _1d7110f1j OF _MSYSMENU ACTIVATE POPUP x退出

DEFINE POPUP a进货管理 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF a进货管理 PROMPT "进货录入"
DEFINE BAR 2 OF a进货管理 PROMPT "进货修改"
DEFINE BAR 3 OF a进货管理 PROMPT "进货查询"
DEFINE BAR 4 OF a进货管理 PROMPT "进货统计"

DEFINE POPUP b销售管理 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF b销售管理 PROMPT "销售录入"
DEFINE BAR 2 OF b销售管理 PROMPT "销售修改"
DEFINE BAR 3 OF b销售管理 PROMPT "销售查询"
DEFINE BAR 4 OF b销售管理 PROMPT "销售统计"

DEFINE POPUP c库存管理 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF c库存管理 PROMPT "库存录入"
DEFINE BAR 2 OF c库存管理 PROMPT "库存修改"
DEFINE BAR 3 OF c库存管理 PROMPT "库存查询"
DEFINE BAR 4 OF c库存管理 PROMPT "库存统计"

DEFINE POPUP d基本信息 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF d基本信息 PROMPT "货物类别"
DEFINE BAR 2 OF d基本信息 PROMPT "货物名称"
DEFINE BAR 3 OF d基本信息 PROMPT "客户类别"
DEFINE BAR 4 OF d基本信息 PROMPT "客户名称"
DEFINE BAR 5 OF d基本信息 PROMPT "供应商类别"
DEFINE BAR 6 OF d基本信息 PROMPT "供应商名称"

DEFINE POPUP e系统设置 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF e系统设置 PROMPT "用户管理"
DEFINE BAR 2 OF e系统设置 PROMPT "重新登录"
DEFINE BAR 3 OF e系统设置 PROMPT "操作日志"
DEFINE BAR 4 OF e系统设置 PROMPT "公司信息"
ON SELECTION BAR 2 OF e系统设置 DO FORM 登录

DEFINE POPUP h帮助 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF h帮助 PROMPT "帮助主题"
DEFINE BAR 2 OF h帮助 PROMPT "使用说明"
DEFINE BAR 3 OF h帮助 PROMPT "关于..."
ON SELECTION BAR 3 OF h帮助 do form 关于

DEFINE POPUP x退出 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF x退出 PROMPT "退出系统"
ON SELECTION BAR 1 OF x退出 QUIT