1. 系统登录
(1)IF LoginEx(username,userpwd)==1 THEN
Display(\"机组监控\");
ENDIF
(2)IF LoginEx(username,userpwd)==1 THEN
Display(\"机组监控\");
userpwd=\"\";
username=\"\";
ELSE
MsgBox(\"用户名或密码不正确,请重新输入\");
#=\"\";
userpwd=\"\";
ENDIF
2.系统退出
IF MsgBox(\"确定要退出系统么\")==1 THEN
Exit(0);
ENDIF
3.登录界面
username=\"\";
userpwd=\"\";
LogoutEx();
CloseWindowEx(\"机组监控\");
CloseWindowEx(\"历史数据查询\");
CloseWindowEx(\"实时曲线\");
CloseWindowEx(\"控制参数\");
录密码
IF userpwd<>\"\" THEN
#=\"******\";
ELSE
#=\"\";
ENDIF
4.机组模式转换
(1)IF MsgBox(\"确定要转换到手动模式吗\")==1 THEN
=1;
=0;
ENDIF
(2)IF MsgBox(\"确定要转换到自动模式吗\")==1 THEN
=1;
=0;
ENDIF
5.机组监控
IF $UserLevel<0 THEN
LogoutEx();
IF (IsWeb()==1) THEN
Display(\"登录窗口_WEB\");
ELSE
Display(\"登录窗口_本机\");
ENDIF
ELSE
Display(\"机组监控\");
ENDIF
6历史查询
IF $UserLevel<0 THEN
LogoutEx();
IF (IsWeb()==1) THEN
Display(\"登录窗口_WEB\");
ELSE
Display(\"登录窗口_本机\");
ENDIF
ELSE
Display(\"历史数据查询\");
ENDIF
7机组启动
IF MsgBox(\"确定要进行机组启动吗\")==1 THEN
=1;
ENDIF
8界面都显示的程序
IF $UserLevel<0 THEN
LogoutEx();
IF (IsWeb()==1) THEN
Display(\"登录窗口_WEB\");
ELSE
Display(\"登录窗口_本机\");
ENDIF
ELSE
ENDIF
因篇幅问题不能全部显示,请点此查看更多更全内容