📄 mainmenu.mpr
字号:
* *********************************************************
* *
* * 11/14/03 MAINMENU.MPR 22:48:23
* *
* *********************************************************
* *
* * Author's Name
* *
* * Copyright (C) 2003 Company Name
* * Address
* * City, Zip
* *
* * Description:
* * This PROGRAM was automatically generated BY GENMENU.
* *
* *********************************************************
* *********************************************************
* *
* * Menu Definition
* *
* *********************************************************
*
SET SYSMENU TO
SET SYSMENU AUTOMATIC
DEFINE PAD _13f1cvrde OF _MSYSMENU PROMPT "基本数据" COLOR SCHEME 3
DEFINE PAD _13f1cvrdf OF _MSYSMENU PROMPT "租赁管理" COLOR SCHEME 3
DEFINE PAD _13f1cvrdg OF _MSYSMENU PROMPT "数据查询" COLOR SCHEME 3
DEFINE PAD _13f1cvrdh OF _MSYSMENU PROMPT "系统管理" COLOR SCHEME 3
ON PAD _13f1cvrde OF _MSYSMENU ACTIVATE POPUP 基本数据
ON PAD _13f1cvrdf OF _MSYSMENU ACTIVATE POPUP 租赁管理
ON PAD _13f1cvrdg OF _MSYSMENU ACTIVATE POPUP 数据查询
ON PAD _13f1cvrdh 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 "员工工资信息"
ON SELECTION BAR 1 OF 基本数据 do form rooms
ON SELECTION BAR 2 OF 基本数据 do form workers
ON SELECTION BAR 4 OF 基本数据 do form salary
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 rents
ON SELECTION BAR 2 OF 租赁管理 do form backrent
ON SELECTION BAR 3 OF 租赁管理 do form rentmoney
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 workercs
ON SELECTION BAR 2 OF 数据查询 do form cilentcs
ON SELECTION BAR 3 OF 数据查询 do form rentcs
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 sysmm
ON SELECTION BAR 2 OF 系统管理 quit
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -