*       *********************************************************
*       *                                                         
*       * 06/16/06            管理菜單.MPR              03:28:43  
*       *                                                         
*       *********************************************************
*       *                                                         
*       * 作者名稱                                                
*       *                                                         
*       * 版權所有 (C) 2006 公司名稱                             
*       * 地址                                                    
*       * 城市,     郵編                                          
*       * 國家                                              
*       *                                                         
*       * 說明:                                            
*       * 此程序由 GENMENU 自動生成。    
*       *                                                         
*       *********************************************************


*       *********************************************************
*       *                                                         
*       *                         菜單定義                        
*       *                                                         
*       *********************************************************
*

SET SYSMENU TO
SET SYSMENU AUTOMATIC

DEFINE PAD _1tt07gfgj OF _MSYSMENU PROMPT "信息輸入" COLOR SCHEME 3
DEFINE PAD _1tt07gfgk OF _MSYSMENU PROMPT "信息查詢" COLOR SCHEME 3
DEFINE PAD _1tt07gfgl OF _MSYSMENU PROMPT "信息修改" COLOR SCHEME 3
DEFINE PAD _1tt07gfgm OF _MSYSMENU PROMPT "密碼修改" COLOR SCHEME 3
DEFINE PAD _1tt07gfgn OF _MSYSMENU PROMPT "退出" COLOR SCHEME 3
ON PAD _1tt07gfgj OF _MSYSMENU ACTIVATE POPUP 信息輸入
ON PAD _1tt07gfgk OF _MSYSMENU ACTIVATE POPUP 信息查詢
ON PAD _1tt07gfgl OF _MSYSMENU ACTIVATE POPUP 信息修改
ON PAD _1tt07gfgm OF _MSYSMENU ACTIVATE POPUP 密碼修改
ON PAD _1tt07gfgn OF _MSYSMENU ACTIVATE POPUP 退出

DEFINE POPUP 信息輸入 MARGIN RELATIVE SHADOW COLOR SCHEME 4
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 SELECTION BAR 1 OF 信息輸入 do form f:\music\forms\gsxxlr
ON SELECTION BAR 3 OF 信息輸入 do form f:\music\forms\gqxxlr
ON SELECTION BAR 5 OF 信息輸入 do form f:\music\forms\zjxxlr

DEFINE POPUP 信息查詢 MARGIN RELATIVE SHADOW COLOR SCHEME 4
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 SELECTION BAR 1 OF 信息查詢 do form f:\music\forms\geshou
ON SELECTION BAR 3 OF 信息查詢 do form f:\music\forms\gequ
ON SELECTION BAR 5 OF 信息查詢 do form f:\music\forms\zhuanji

DEFINE POPUP 信息修改 MARGIN RELATIVE SHADOW COLOR SCHEME 4
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 3 OF 信息修改 ACTIVATE POPUP 歌曲信息修
ON BAR 5 OF 信息修改 ACTIVATE POPUP 專輯信息修

DEFINE POPUP 歌手信息修 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 歌手信息修 PROMPT "歌手信息修改"
DEFINE BAR 2 OF 歌手信息修 PROMPT "歌手信息刪除"
ON SELECTION BAR 1 OF 歌手信息修 do form f:\music\forms\gsxxxg
ON SELECTION BAR 2 OF 歌手信息修 do form f:\music\forms\gsxxsc

DEFINE POPUP 歌曲信息修 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 歌曲信息修 PROMPT "歌曲信息修改"
DEFINE BAR 2 OF 歌曲信息修 PROMPT "歌曲信息刪除"
ON SELECTION BAR 1 OF 歌曲信息修 do form f:\music\forms\gqxxxg
ON SELECTION BAR 2 OF 歌曲信息修 do form f:\music\forms\gqxxsc

DEFINE POPUP 專輯信息修 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 專輯信息修 PROMPT "專輯信息修改"
DEFINE BAR 2 OF 專輯信息修 PROMPT "專輯信息刪除"
ON SELECTION BAR 1 OF 專輯信息修 do form f:\music\forms\zjxxxg
ON SELECTION BAR 2 OF 專輯信息修 do form f:\music\forms\zjxxsc

DEFINE POPUP 密碼修改 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 密碼修改 PROMPT "密碼修改"
ON SELECTION BAR 1 OF 密碼修改 do form f:\music\forms\修改用戶密碼1

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 退出 set sysmenu to default
ON SELECTION BAR 3 OF 退出 quit