|
第三章 概要设计 内容来自www.paper51.com 3.1.软件总体目标 paper51.com 生产单位在人员相对稳定的情况下进行考勤记录，计算职工工资，每月都是重复性工作。为了简化工资考勤工作，提高工资管理工作效率，充分利用计算机和数据库技术完成本单位工资考勤管理工作成为本次软件设计的目标。 copyright paper51.com 3.2假设和约束 paper51.com 该软件运行需在Windows环境下，客户端内存至少32M。 内容来自www.paper51.com 推广使用时的约定:本系统数据库采用桌面数据库ACCESS，因些系统需要安装微软OFFICE工具。 内容来自论文无忧网 www.paper51.com 3.3总体数据流程结构图 http://www.paper51.com
图3 系统数据流程结构图 paper51.com 3.4系统详细功能图 http://www.paper51.com
图4 系统功能图 内容来自论文无忧网 www.paper51.com 第四章详细设计 内容来自www.paper51.com 4.1设计目的 copyright paper51.com 系统是根据工资考勤工作过程中，从单位、职工、考勤、工资等四个环节进行分析和设计，最终的目的就是提高职工考勤工作效率。 内容来自www.paper51.com 4.2 实现工具简介 http://www.paper51.com 4.2.1 Delphi 简介 内容来自www.paper51.com Delphi 是由Borland公司推出的基于窗口和面向对象的编程工具，与Windows操作系统紧密的结合，具有强大的数据库技术支持，迅捷的编辑速度，易学灵活的特点。Delphi 非常擅长数据库编程，因为它适用于多种数据库结构，从客户机/服务器模式到多层数据库模式，另外大量的控件给开发数据库程序提供了极大的便捷。 copyright paper51.com 4.2.2Access数据库 内容来自www.paper51.com
作为毕业设计，系统采用了微软桌面数据库Access， Access操作方便，只需要计算机安装OFFICE就可运行本系统，但缺点是作为本地文件，安全性不高。 paper51.com
4.2.3 ado连接数据库 http://www.paper51.com
程序数据接口部分采用ADO和连接数据库连接，以便应用程序的移植。 copyright paper51.com 4.3详细设计及界面设计说明 内容来自www.paper51.com
4.3.1 数据库模块 copyright paper51.com
数据库模块主要定义数据连接单元，通过ADO连接ACCESS数据文件，为查询QUERY提供数据连接串。具体源码如下： 内容来自论文无忧网 www.paper51.com procedure Tdmrsgl.DataModuleCreate(Sender: TObject); http://www.paper51.com
var mypath:string; paper51.com begin 内容来自www.paper51.com adorsgl.Connected:=False; paper51.com adorsgl.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Password="";UserID=Admin;'+ copyright paper51.com 'Data Source='+ExtractFilePath(paramstr(0))+'database\kqgl.mdb;'; 内容来自论文无忧网 www.paper51.com adorsgl.Connected:=True; paper51.com end; copyright paper51.com 4.3.2 用户登录 内容来自www.paper51.com
根据数据库里的用户信息进行登录，界面如下： paper51.com 图5系统登录窗口 copyright paper51.com 其中确定按纽的源码如下： 内容来自论文无忧网 www.paper51.com
procedure Tfrmlogin.btnyesClick(Sender: TObject); 内容来自论文无忧网 www.paper51.com var findstring:string; 内容来自论文无忧网 www.paper51.com
begin 内容来自论文无忧网 www.paper51.com withdmrsgl.userqry do copyright paper51.com begin copyright paper51.com
close; copyright paper51.com sql.Clear; paper51.com findstring:='select * from usertrb wherename='+quotedstr(combobox1.Text)+'and password='+quotedstr(edit1.Text); 内容来自www.paper51.com sql.Add(findstring); 内容来自论文无忧网 www.paper51.com open; http://www.paper51.com
内容来自www.paper51.com |