处理：
（1) 用户登录窗体启动。
（2) 用户填写用户名并输入密码。
（3) 从用户清单表中检查是否有相应的用户名和密码。 （4) 如果输入的用户名或相应密码错误，进行提示。
（5) 如果输入的用户名和相应密码正确，判断用户的权限并且进入主控制平台
输出：主控制平台
除了必要的控件外还需要一数据库控件TADTable，设置ConnectionString连接到工资管理数据库。
登陆验证部分代码为： form2.ADOTable1.Locate('',VarArrayOf([edit1.Text,
edit2.Text,'管理员'])//Button1按钮事件(管理员)，验证用
户登录信息
由于管理员和职工进入的主界面相同，所以只需要设置一些按钮的Enable为false即可，这样做减少了窗体，相应的程序所占用的空间也减少。
因为“良好的交互性有利于提高人机匹配效率“，所以，除以上代码之外，还需设置提醒信息：如“登陆失败”，“请重新登陆”等字样，这样，出现错误的时候可以友好的提示用户。
用
户
名
;
密
码
;
权
限
- 17 -
4.3 主窗体设计
用户登录后进入系统的主界面，如图4-3所示：
图4-3
在这个项目中，选择使用多文档界面。使用这个窗体的好处是可以使程序更加有条理。对于一个多任务的应用程序，使用多文档窗体还可以减少占用的系统资源。
主窗体设计的界面是用菜单编辑器做的，主要信息录入、信息查询、信息修改、信息打印四部分组成。主窗体是进行相关操作的主界面。
该界面是系统的主界面，通过主界面进入其他的功能界面。其中用户能够显示登录的用户名而权限显示的该用户所具有的权限。如果是管理员权限能够对整个系统进行所有的操作，而普通用户权限只能进入信息查寻、录入和修改自己的信息。
在住窗体中进入信息录入(员工信息录入，员工工资录入，部门信息
18
录入)时，进入的是同一个窗体(Form4)，所以在单击菜单编辑器时就需要用代码对Format4窗体进行必要的修改，如Form4的Caption，ADOTabel连接的数据表，还有Edit和Label的可见度和Label的Caption，Form4的大小等。
4.4 信息录入管理窗体设计
信息录入窗体—员工信息录入，如图4-4：
图4-4
4.4.1 录入模块设计
该窗体时由’三个窗体‘集合而成Form5，包括员工信息录入，员工
- 19 -
工资录入，部门信息录入三个部分。当员工进入时只能用员工信息录入。其他二个功能的Enable为false不可用。
主要源码：
A． 判断录入信息是否完整：
if
(form5.Edit1.Text='')
or
(form5.Edit2.Text='') or (form5.Edit3.Text='') then showmessage('信息不完整') B． 连接数据库：
if form5.Caption='员工信息录入' then//根据标题确定连接的数据表
begin
form5.ADOTable1.Connection:=Form2.ADOConnection1; Form5.ADOTable1.Close;
form5.ADOTable1.TableName:='员工基本信息表';//连接
的数据表
form5.ADOTable1.Open;
form5.ADOTable1.Active:=true;
C．系统进入录入状态：form5.ADOTable1.Insert; D．录入三种数据类型数据的转换：
1.字符串型：form5.ADOTable1.FieldByName('员工编号
').AsString
:=edit1.Text;
2.时间型：form5.ADOTable1.FieldByName('出生年月
').AsDateTime:
=strtodatetime(edit4.Text);
20
