main.mpr

来自「可以完成图书的借还」· MPR 代码 · 共 41 行

*       *********************************************************
*       *                                                         
*       * 01/09/04              MAIN.MPR                20:34:14  
*       *                                                         
*       *********************************************************
*       *                                                         
*       * 作者名称                                                
*       *                                                         
*       * 版权所有 (C) 2004 公司名称                             
*       * 地址                                                    
*       * 城市,     邮编                                          
*       * 国家                                              
*       *                                                         
*       * 说明:                                            
*       * 此程序由 GENMENU 自动生成。    
*       *                                                         
*       *********************************************************


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

SET SYSMENU TO
SET SYSMENU AUTOMATIC

DEFINE PAD _1511838v6 OF _MSYSMENU PROMPT "系统维护" COLOR SCHEME 3
DEFINE PAD _1511838v7 OF _MSYSMENU PROMPT "退出" COLOR SCHEME 3
ON PAD _1511838v6 OF _MSYSMENU ACTIVATE POPUP 系统维护
ON SELECTION PAD _1511838v7 OF _MSYSMENU quit

DEFINE POPUP 系统维护 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 系统维护 PROMPT "修改登录密码"
DEFINE BAR 2 OF 系统维护 PROMPT "\-"
DEFINE BAR 3 OF 系统维护 PROMPT "退出"
ON SELECTION BAR 1 OF 系统维护 do form mima
ON SELECTION BAR 3 OF 系统维护 quit