登录画面的制作
制作MCGS登录画面,通过判断登录用户的组别,打开不同窗口,如图1-15所示。
图1-15 登录画面
在用户窗口添加5个画面,分别是操作员窗口、启动画面、登录画面、工程师窗口、管理员窗口,如图1-16所示。完成后用鼠标右键单击“启动画面”,将其设置为启动窗口。
图1-16 用户窗口
在实时数据库中添加内部变量“用户组别”,变量数据类型为“字符型”,如图1-17所示。
图1-17 实时数据库
在登录画面中添加“请登录系统”标识和“登录系统”按钮,如图1-18所示。
图1-18 登录画面
选中工具菜单,进入“用户权限管理”窗口,添加用户名和用户组并设置登录密码。 A1为管理员组别,B1为工程师组别,C1为操作员组别,如图1-19所示。
图1-19 用户权限设置
在登录画面中双击“登录系统”按钮,在属性设置窗口中,进入脚本程序编写窗口,编写以下脚本(图1-20):
图1-20 登录脚本
“IF ! LogOn( )=0 THEN
用户组别=! GetCurrentGroup( )
ENDIF
IF ! strComp(用户组别,"管理员")=0 THEN
用户窗口。管理员窗口. Open( )
ENDIF
IF ! strComp(用户组别,"工程师")=0 THEN
用户窗口。工程师窗口. Open( )
ENDIF
IF ! strComp(用户组别,"操作员")=0 THEN
用户窗口。操作员窗口. Open( )
ENDIF”
本脚本的含义为:在抬起按钮后,弹出登录对话框,登录成功后,将已登录用户组别赋值给“用户组别”变量;再将“用户组别”变量与“管理员”“工程师”“操作员”字符进行比较,根据比较结果分别进入不同画面窗口。
函数解释:
(1)“! LogOn( )”函数,弹出登录对话框,如果登录成功“! LogOn( )=0”,函数返回值为0;
(2)“! strComp()”函数,对括号内的字符进行比较,“! strComp(用户组别,"管理员")=0”是指将“用户组别”变量与“管理员”字符进行比较,如果一致,返回值为0。
任务单——登录画面制作
续表
实验评价表
注:评价档次统一采用A(优秀)、B(良好)、C(合格)、D(努力)4个级别。