学生公寓管理系统设计毕业论文.doc

毕业论文(设计)目 录第1章 引言11.1 课题背景11.2 研究与应用现状21.3 本文的主要内容2第2章 相关技术介绍32.1 Delphi32.1.1 Delphi特点32.1.2 Delphi742.1.3 Delphi与VB42.2 Access 200352.2.1 Access 200352.2.2 Access2003的特点52.3 ADO技术5第3章 需求分析63.1 需求分析63.1.1 学生公寓需求简介63.1.2 功能性需求63.1.3 非功能性需求63.2 可行性分析73.2.1 经济可行性73.2.2 技术可行性7第4章 总体设计84.1 总体设计目标84.2 功能模块设计84.3 数据库设计94.3.1 数据流分析94.3.2 数据建模124.3.3 各实体关系模型134.3.4 数据库逻辑结构设计14第5章 系统详细设计及其实现185.1 系统工程框架185.1.1 学生公寓管理系统的模块：185.1.2 Data 数据模块185.2 系统各模块详细设计及其实195.2.1 登录窗体与系统主界面设计及实现195.2.2 公寓管理模块设计及实现215.2.3 学生查询管理模块设计及实现255.2.4 学生管理模块设计及实现275.2.5 来访登记管理模块设计及实现315.2.6 系统管理和维护模块设计及实现34第6章 学生公寓管理系统设计总结366.1 系统的优点366.2 系统的局限性366.3 毕业设计心得366.4 毕业设计总结37致 谢38参考文献38附 录139附 录245学生公寓管理系统摘 要: 在各高校扩大招生的形势下,公寓管理的工作变得越来越繁重。采用传统的人工管理模式，效率低下，不能满足实际的需求。本文描述的是基于Windows环境的学生公寓管理系统，对学生公寓管理的需求进行了分析。本系统的主要功能包括：住宿人员的信息查询、出入登记、公寓管理以及对学生住宿情况的查询，可以更快地知道每个学生的住宿情况，使公寓的管理效率更高。系统的设计与开发采用服务器/客户机的系统结构模式，使用Delphi开发工具开发，应用Access 2003数据库管理系统，通过ADO连接数据库。本篇论文以一个学生公寓管理系统的分析、设计和开发的全过程为主线，给出了学生公寓管理系统的设计和技术实现的过程，特别在细节上分析功能和函数的实现思想。涉及到学生公寓管理的基本功能在本论文中都有相应的描述。关键字： Delphi；ADO；Access 2003；学生公寓管理第1章 引言随着经济的发展，社会的进步，计算机越来越深入到我们日常的工作学习及生活中，成为我们日常生活中不可缺少的辅助工具. 随着科学技术的不断提高,计算机科学日渐成熟,其强大的功能已为人们深刻认识,它已进入人类社会的各个领域并发挥着越来越重要的作用.它已经深入到日常工作和生活的方方面面，比如文字处理、信息管理、辅助设计、图形图像处理、教育培训以及游戏娱乐等.各行各业的人们无须经过特别的训练就能够使用电脑完成许许多多复杂的工作.然而，虽然现在世界上已经充满了多如牛毛的各种软件，但它们依然不能满足用户的各种特殊需要，人们还不得不开发适合自己特殊需求的软件.以前开发Windows应用软件是专业人员的工作，需要掌握许多专业知识和经过特殊的培训才能胜任.现在不同了，即使你没有接受过严格的程序设计训练，使用Delphi编程语言也一样能够开发出功能强大、适合自己特殊需求的应用程序了.Delphi编程语言继承了其他语言易学易用的特点，特别适合于初学者学习Windows系统编程.随着电脑的普及与使用，现在的管理也提升了一个档次，渐渐实现了无纸化办公。高校是科研的阵地，后勤的公寓管理也应该一改传统的人工管理，更加信息化，时代化，节省人力物力，提高效率。基于这一点，开发此学生公寓管理系统。1.1 课题背景高校公寓管理部门在宿管工作中担负着管理，检查，收费，协调等重要的管理任务。住宿安排、水电使用的收费、外来人员访问管理等，所涉及的管理面广，内容多，整个公寓管理的工作量很大。计算机的应用为实现公寓管理科学化奠定基础。计算机的应用推动了公寓管理工作向着正规化、科学化、自动化、现代化的方向发展。学生公寓管理系统从学生的分房到最后的公寓管理全部电脑化。本系统主要包括：住宿人员信息查询、出入登记、收费注册以及对学生住宿情况等的查询，可以更快地了解到每个学生的住宿情况以及这个学校寝室分配的情况。使用学生公寓管理系统，只需一到两名数据操作员即可操作管理系统，节省大量人力和财力；可以存储大量学生住宿的基本信息，安全、高效、快捷；可以迅速查到所涉及的各种信息；操作简单，使用方便、高效；系统使用寿命长、成本低。这些特点可以极大地提高公寓信息管理的效率。1.2 研究与应用现状据调查显示，现在国内绝大多数学校的学生公寓管理还没有信息化，主要还是停留在手工管理的形式。这样，公寓管理的效率就非常低，需要的人力，物力也非常多，所以，尽快开发一套适合各高校的学生公寓管理系统是非常必要的。1.3 本文的主要内容 本文研究的主要内容有：1. 学生公寓管理系统的需求分析2. 学生公寓管理系统开发的相关技术3. 学生公寓管理系统的总体设计4. 系统数据库的概念设计5. 系统各模块的详细设计6. 系统评价以及设计中碰到的难点第2章 相关技术介绍开发数据库管理信息系统需要两种工具，即前台开发语言和后台数据库。本系统前台开发技术使用Delphi，后台数据库使用Access 2003。Delphi灵活方便，与后台的Access 2003数据库相结合，可以提供一个高性能的学生公寓管理系统。2.1 Delphi4Delphi是Pascal语言的一种版本，但它与传统的Pascal语言有很大差别。一个Delphi程序首先应是程序框架（Frame），而这一框架正式应用程序的“骨架”。在骨架上即使没有附着任何东西，仍然可以运行。所要做的工作只是在“骨架”中加入程序。缺省的应用程序是一个空白的窗体（Form），运行可以得到一个空白的窗口。这个窗口具有Windows窗口的全部性质，可以被放大缩小、移动、最大最小化等。程序框架及一个空白的窗体已经是一个可运行应用程序，只是不处理任何事情。2.1.1 Delphi特点Delphi自从1995年2月诞生以来，获得了巨大的荣誉和广泛的影响力，以可视化编程、强大的编译功能、友好的用户界面闻名于世。1. 主要特点是： 1). 高效的可视化组件库和面向对象的架构。2). 具有多种操作向导和在线帮助，大大方便程序编写。3). 界面设计所见即所得和鼠标拖曳方式，可以轻松设计出华丽的界面。4). 支持各种最新及最常用的技术如 Win32 API、OLE、COM、DCOM、ActiveX、ISAPI、NSAPI、DirectX等。5). 全面支持Windows 应用程序。6). 具有开放式数据库结构，集成了丰富的数据库开发工具。7). 具有强大的面向网络编程功能，其C/S开发工具在高性能的快速应用程序开发领域成为行业标准。2. Delphi产品按照功能可以分为4个类型：1). Delphi集成开发环境（Integrate Develop Environment）：提供友好的用户编程开发界面，集成了高效的编译器、项目管理器、团队开发支持、高级调试等功能。2). Delphi可视化组件库（Visual Component Library）：提供几百个常用组件，用于数据库访问、用户接口、数据处理、报表和Internet开发。3). Borland数据引擎（Borland Data Engineer）：能够进行数据库管理，并与数据库服务器高速连接。4). MIDAS：是一个集成与Delphi的分布式应用稽核，功能强大，主要用于商业逻辑的智能集中管理和企业交易的快速处理。2.1.2 Delphi72002年8月6日，Borland公司正式宣布推出Delphi 7 Studio，全面支持Microsoft公司.NET平台应用的开发。Delphi7是一个针对Windows平台上的跨平台快速开发（RAD）环境。Delphi7的一个显著特性是企业开发和部署。Delphi7的新特点：1. 企业应用的MDA开发：通过让开发者从设计到发布都重复使用一个应用程序，加速开发进程，同时显著减少代码量和需要的开发时间。2. 可视化的快速Web开发：让开发者能够在Delphi7环境中可视化地创建Web应用，并且利用它的应用模型框架，不必再考虑通用的服务器端的开发任务，还能透明地处理会话管理。3. 内建的Linux的跨平台支持：Delphi7在出售时将附带Delphi语言版本的Dylix3。Kylix3是第一个Linux操作系统上的高性能的可视化集成开发环境（IDE），它适用来快速创建数据库应用、GUI应用、Web应用和Web服务应用。4. 企业级的报表能力：让开发者能创建跨平台的报表，这些报表能帮助查看应用程序运行的效率。5. Windows XP应用：Delphi7包含了对Windows XP风格支持，让开发者能够创建可以利用Windows XP 使用者界面风格的应用。2.1.3 Delphi与VBVisual Basic（VB）是一种由微软公司开发的包含协助开发环境的事件驱动编程语言。它源自于BASIC编程语言。VB拥有图形用户界面（GUI）和快速应用程序开发（RAD）系统，可以使用DAO、RDO、ADO连接数据库，或者创建ActiveX控件。1. 本系统采用Delphi进行开发，主要原因：2. VB不支持面向对象，Delphi却是面向对象的。3. VB无法编译原生目标文件，而Delphi可以。4. VB无法对底层操作，而Delphi可以。5. VB有依赖性，即用VB作的程序换别的操作系统还要重新包装，Delphi则不用。6. VB没有类库，Delphi的类库很多，还可以继承。2.2 Access 20032数据库是数据管理的最新技术，是计算机科学的重要分支。今天，信息资源已成为各个部门的重要财富和资源。建立一个满足各级部门信息处理要求的行之有效的信息系统也成为企业或组织生存和发展的重要条件。因此，作为信息系统核心和基础的数据库技术得到越来越广泛的应用。对于一个国家来说，数据库的建设规模、数据库信息量的大小和使用频度已成为衡量一个国家信息化程度的重要标志。2.2.1 Access 2003Access 是Office2000里面的一个组件。是用来制作简单的数据库。数据库是有结构的数据集合,它与一般的数据文件不同，(其中的数据是无结构的)是一串文字或数字流。数据库中的数据可以是文字、图象、声音等。 Access不仅是一个数据库，而且它具有强大的数据管理功能，它可以方便地利用各种数据源，生成窗体（表单），查询，报表和应用程序等。 2.2.2 Access2003的特点Access是一种桌面数据库，只适合数据量少的应用，在处理少量数据和单机访问的数据库时是很好的，效率也很高。但是它的同时访问客户端不能多于4个。access数据库有一定的极限，如果数据达到100M左右，很容易造成服务器iis假死，或者消耗掉服务器的内存导致服务器崩溃。优点是：操作灵活、转移方便、运行环境简单，对于小型网站的数据库处理能力效果还不错。缺点是：不支持并发处理、数据库易被下载存在安全隐患、数据存储量相对较小、数据量过大时严重影响网站访问速度和程序处理速度。2.3 ADO技术5ADO( Active Data Objects )是一种提供访问各种数据类型的链接机制，是通过ODBC的方法访问数据库的接口。ADO主要优点是易于使用、高速度、低内存支出和占用磁盘空间较少，同时具有远程数据服务(RDS)功能。在Delphi中，提供了一组ADO组件，用于对ADO访问能力的支持。第3章 需求分析3.1 需求分析3.1.1 学生公寓需求简介学生公寓管理应考虑以下几方面的要求：用户需求：可以对学生公寓进行有效的管理，包括公寓信息、寝室信息、学生住宿资料以及交费信息等。学生方面：让学生感觉到学校的管理透明。学校方面：可以查询每一个学生的相关信息。来访人员方面：为防止公寓安全，所有来访人员必须提供学生住宿的公寓号和寝室号才可以进入公寓。3.1.2 功能性需求软件需求分析是指对目标软件系统在功能、行为、性能、设计约束等方面的期望。需求分析是软件设计、实现测试直至维护的主要基础，良好的需求分析可以避免或尽早提出早期的错误，从而降低软件的开发成本，改进软件的质量。本学生公寓管理系统应完成以下任务：学生寝室基本信息管理：首先统一安排学生入住，如果有学生要更换寝室，可以方便查到哪个寝室还有空床，包括该寝室内已住学生的基本信息，安排入住。学生查询管理：包括对学生基本信息的查询，管理员可以根据学生的学号、姓名、家庭住址、学生班级以及混合查询来查询学生的基本信息。学生公寓管理：可以添加新建公寓的信息，以及添加该公寓内的寝室信息，以及修改公寓和寝室的相关信息（公寓号和寝室号）。学生基本信息管理：可对学生的基本信息，入校，离校进行管理，以及学生的学期注册和个人的私人财物进行管理。来访人员管理：对来访人员进行严格登记，包括来访时间，结束时间，来访人员的来访事由，能查询到每一条来访人员和被访人的信息。3.1.3 非功能性需求用户界面需求：简洁、易用、易懂，友好的用户界面。硬件需求：Pentium以上计算机可靠性需求：保证用户在正常使用本系统时，用户的操作或误操作不会产生数据丢失。安全保密性需求：用户登录需要密码验证。3.2 可行性分析开发任何一个系统，都会受到时间和资源上的限制。因此，在每一个项目开发之前，都要进行可行性分析，以减少项目的开发风险，避免人力，物力和财力的浪费。可行性分析主要包括经济可行性和技术可行性等。3.2.1 经济可行性经济可行性，主要是针对一个学校的，开发系统的成本与收益相比较。如今是信息化时代，信息化管理可以使学生公寓管理更加系统化，全面化、快速化，这样可以为学校带来高校的工作效益和经济效益，开发出本系统可以减少公寓管理人员人数，而且管理方便，各功能实现快速，数据有效的管理。这些效益和管理上的便捷远远超过了开发本系统的成本，所以在经济上具有完全的可行性。3.2.2 技术可行性本系统开发工具是Delphi和Access 20003。Delphi具有可视化界面，是一种面向对象的语言，简单易学而且灵活方便，Access2003是一个安全、可靠的并且容易学习操作应用的数据库。易用性和可维护性也很好。在大学期间，曾自学过Access数据库2。所以，学生公寓管理总体上开发难度不高，技术上具有完全的可行性。数据库的设计和操作是本系统设计的核心。大学期间曾经学习过软件工程3和SQL数据库1，也以四人一组完成过有关的大作业，具备一定的系统分析与设计能力，熟悉数据的设计与操纵。因此，本系统的实现在技术上是可行的。第4章 总体设计4.1 总体设计目标1. 减少公寓管理人员大量繁琐的工作。 公寓管理人员通过使用本系统，可以随时根据需要，查询公寓、寝室、来访人员、学生等信息，对学生公寓管理系统中的数据进行录入、添加、删除和查询，并可以根据特定条件对数据进行查询。2. 减少学校在学生公寓管理方面的人力和物力的投资。学生公寓管理系统功能强大、操作简单，拥有友好的易额面，适用于各类学校的学生公寓管理。4.2 功能模块设计 系统功能模块如图4.1所示，包括对公寓管理、学生管理、学生查询管理、来访人员登记管理和系统管理和维护五大模块的设计,下面简要介绍这5个模块的主要功能。1. 公寓管理：包括公寓楼房管理和寝室管理。对学校的公寓以及公寓里的寝室进行管理，处理包括数据的添加、修改、删除、查询等。2. 学生管理：包括学生基本信息管理和学生交费、注册等管理。对学生入住寝室信息和学生基本信息的管理以及以寝室为单位的收费管理，包括对数据的添加、修改、删除、查询等。3. 学生查询管理：包括对学生基本信息的查询，管理员可以根据学生的学号、姓名、家庭住址、学生班级以及混合查询来查询学生的基本信息。4. 来访人员登记管理：公寓登记信息的处理，为维护公寓的安全，对来访人员有严格的审查，以及对登记信息的处理。5. 系统管理和维护：包括修改口令，添加用户等。学生公寓管理信息系统学生查询管理学生管理学生基本信息管理公寓管理来访登记管理学生注册管理公寓楼房管理公寓寝室管理针对各模块不同的表实现添加记录、修改记录、删除记录以及查询显示记录等功能系统管理维护个人财物管理图4.1学生公寓管理系统功能模块图4.3 数据库设计4.3.1 数据流分析3数据流图是结构化系统分析的基本工具。一个数据流图确定了系统的转化过程、系统所操纵的数据或物质的收集（存储），还有过程、存储、外部世界之间的数据流或物质流。数据流图技术是可以扩充到允许实时系统的建模。数据流图是当前业务过程或新系统操作步骤的一种表示方法。数据流图可以在一个抽象的广泛范围内表示系统。在一个多步骤的活动中，高层数据流图对数据和处理部分提供一个整体的统览，这是对包含在软件需求规格说明中的精确、详细叙述的补充。数据流图描述了软件需求规格说明中的功能需求怎样结合在一起，使用户可以执行指定的任务。从图中迅速反馈的信息有助于对所探讨的任务流的理解进行提炼加工。学生公寓管理系统的第一层数据流图如图4.2所示。本数据流图描述了学生公寓系统的各个模块处理过程中的数据处理的过程。员工信息员工管理宿管科公寓管理寝室管理来访人员管理学生管理寝室信息寝室信息公寓信息学生基本信息来访人员信息公寓信息来访人员登记信息学生信息图4.2学生公寓管理系统第一层数据流图 公寓管理中的数据处理图是本系统的第二层数路流图如图4.3所示,描述了在公寓管理中所作操作的数据处理。宿管科删除处理添加处理修改处理拆迁的公寓添加新建公寓修改的公寓公寓基本信息图4.3公寓管理模块数据流图寝室管理数据流程图如图4.4 所示，描述了用户在添加、删除、查询寝室信息时的数据处理过程。宿管科添加处理删除处理查询处理删除毕业生或离校生信息寝室信息图4.4寝室管理模块数据流图 来访人员管理数据流图如图4.5所示，描述了在来访人员访问学生时，用户所作操作的数据处理过程。宿管科来访信息添加来访人员信息查询处理删除处理图4.5来访人员管理数据流图 学生交费注册管理数据流图如图4.6所示，描述了学生交费与宿管科收费处理过程中的数据处理过程。宿管科添加注册项目交费学生交费、注册信息查询处理报表打印图4.6学生交费管理数据流图公寓员工管理数据流图如图4.7所示,描述了对员工的添加、修改、删除、查询员工信息时的数据处理过程。查询查询宿管科添加处理删除处理员工信息修改处理图4.7公寓员工管理数据流图4.3.2 数据建模模型是软件的第一个技术表示。信息系统的建模是用模型来描述复杂的信息系统，使得系统的要求、结构和数据变得简单。设计者通过描述用户的需求获得与用户的不断交互，最终对整个系统能全面地把握。建立完整的数据模型，完成对信息系统中数据的存储和处理。学生公寓管理系统比较复杂，为了建立这样一个复杂系统的模型，并满足实际对象不断发展的需求，在实际设计中应遵循下列原则：1. 准确性：所建立的模型要求能够正确反映实际的对象，能够满足学生公寓管理工作的实际需求。2. 完整性：指要求模型既能反映对象系统的静态特性，同时能够反映其丰富的动态特性。3. 一致性：要求建立的模型能保证从分析阶段到设计阶段的平稳过渡。4.3.3 各实体关系模型经过分析，由上面的数据流程图可以得出以下各实体之间的E-R图，如图4.8至4.10所示。公寓管理管理员mn寝室组成1n图4.8公寓E-R图寝室床位学生公寓nm11n1所属住宿拥有n图4.9寝室E-R图床位寝室公寓住宿拥有组成1nnm1n学生来访人nmm1访问管理员管理注册mn图4.10公寓管理E-R图4.3.4 数据库逻辑结构设计基本定义：主键：在表中是唯一不可重复的值。具有索引的作用，可以用来快速查询表内数据。外键：有此表的列或列的组合和其他表的主键值或UNIQUE_KEY具有相关联的特性。此时，可以将这些列或列组合定义为外键。索引：建立索引是为了加快查询速度的有效手段。用户可以根据应用环境的需求，在基本表上建立一个或多个索引，以提供多种存取路径，加快查找速度。视图：从一个或几个基本表（或视图）导出的表，它与基本表不同，是一个虚表。学生公寓管理系统的数据库2包含了manage 表、empleer 表、TBPD表Tborder表、visit表、TBEnrol表、worth表、grade表、house 表 及registe表，共10张表，下面分别对各个表的功能及结构作简要介绍。1. manage 表：用来保存系统用户的帐号和密码，表结构如表4-1所示。表4-1：manage 表字段名称数据类型说明用户名文本主键密码文本权限文本备注文本2. empleer 表：用来保存公寓员工的信息，表结构如表4-2所示。表4-2：empleer 表字段名称数据类型说明员工号文本主键姓名文本性别文本房号文本楼层文本职位文本家庭住址文本联系方式文本备注文本3. TBPD 表：用来保存寝室的基本信息，表结构如表4-3所示。表4-3：TBPD 表字段名称数据类型说明id自动编号主键寝室号文本应住人数数字实住人数数字价格贷币居住性别文本状态文本备注备注4. Tborder表：用来保存寝室学生的基本信息，表结构如表4-4所示。表4-4：Tborder表字段名称数据类型说明学号文本主键姓名文本性别文本寝室号文本出生年月日期/时间入学日期日期/时间专业文本班级文本政治面貌文本毕业学校文本家庭地址文本联系方式文本状态文本备注备注5. visit 表：用来保存公寓来访人员的基本信息，表结构如表4-5所示。表4-5：visit 表字段名称数据类型说明id自动编号主键来访姓名文本要访姓名文本所属关系文本来访时间日期/时间结束时间日期/时间值班人文本证件名称文本备注备注6. TBEnrol 表：用来保存公寓出访人员的基本信息，表结构如表4-6所示。表4-6：TBEnrol 表字段名称数据类型说明id自动编号主键姓名文本性别文本班级文本证件名称文本出楼贷物文本出楼时间日期/时间值班人文本备注备注7. worth表：用来保存学生个人财产的基本信息，表结构如表4-7所示。表4-7：worth表字段名称数据类型说明学号文本主键姓名文本寝室号文本床位号文本钥锁发否文本桌子号文本电话号码文本备注备注8. grade 表：用来保存寝室评比的信息，表结构如表4-8所示。表4-8：grade 表字段名称数据类型说明寝室号文本主键寝室长文本周评分数字月评分数字总评分数字备注备注9. house 表：用来保存公寓的基本信息，表结构如表4-9所示。表4-9：house 表字段名称数据类型说明楼房号文本主键楼层数数字房间数数字建筑时间日期/时间建筑成本贷币备注备注 10. registe表：用来保存学生的注册交费信息，表结构如表4-10所示。表4-10：registe表字段名称数据类型说明学号文本主键姓名文本寝室号文本第一学期文本第二学期文本第三学期文本第四学期文本第五学期文本第六学期文本欠费情况文本备注文本第5章 系统详细设计及其实现5.1 系统工程框架系统工程框架主要简介了学生公寓系统各模块,并对数据模块Data作了详细的说明，并且介绍了相应的实例。5.1.1 学生公寓管理系统的模块：1. 公寓管理模块。2. 学生查询管理模块。3. 学生管理模块。4. 来访登记管理模块。5. 系统管理和维护模块。5.1.2 Data 数据模块5学生公寓管理系统的数据库连接管理在DataMd模块中的MD.pas中，定义了数据库连接字符串connectionStr来改变连接，步骤如下：1. 打开ADO控件页；2. 在窗口上放一个TADOConnection控件，属性设置如下：点ConnectionString属性旁边的扩展按钮，然后在弹出的对话框中选择Microsoft OLE DB for SQL Server,最后点测试看看连接是否成功；成功后点确定按钮，这样就将ConnectionString属性设置成功。3. 在窗口上再放一个TADOQuery控件，并设置属性Connection指向TADOConnection控件，且在SQL 属性中设置查询语句。4. 最后在窗体上放TDataSource控件，设置其DataSet属性指向TADOQuery控件。 再放置一个数据浏览控件，并将其DataSource属性指向TDataSource控件。 5. 将TADOQuery属性的Active设置为True，你将看到数据感知控件中显示连接数据库表的内容。5.2 系统各模块详细设计及其实5.2.1 登录窗体与系统主界面设计及实现1. 登录窗体设计及实现登录窗体命名为LoginForm，界面设计如图5.1所示。图5.1 登录窗体登录窗体的主要功能是通过用户名和密码来验证用户身份的合法性。在用户输入完用户名和密码之后,程序会将用户名和密码与数据库中的数据进行对比，用户登录的机会为3次，如果连续3次密码错误，系统会自动关闭。不同身份登陆有不同的权限。登录窗体验证用户的主要流程如图5.2所示。开始是否输入用户名和密码把用户名和密码赋值给变量用户名是否存在用户名与密码是否匹配登录成功是否失败3次否退出程序是否否否是是是图5.2 登录窗体流程图登录程序设计中，用变量inputNum来记录输入错误密码的次数，其初始值为零，登录窗体在主窗体出现之前弹出，主要算法代码如下： begin / 当用户名与密码正确并且输入次数少于三次时就登录成功 if locate(用户名,username,lopartialkey) and locate(密码,password,lopartialkey) and (itimes0 then begin for i:=1 to strtoint(FieldByName(楼层数).AsString) do combobox3.Items.Add(层+IntToStr(i); endelseshowmessage(没有记录，请管理员录入数据信息);end;end;/函数是用来判断相应的编辑框是否为空Function TryEmpty(Sender:Tobject):boolean;beginIf Trim(sender as Tedit).Text)= then begin ShowMessage(当前选项不能为空); result:=true; (Sender as Tedit).SetFocus; Endelse result:=false;end;end;5.2.3 学生查询管理模块设计及实现1. 学生查询管理模块主要功能1). 按学号查询。2). 按姓名查询。3). 按家庭住址查询。4). 按学生班级查询。5). 混合查询。2. 学生查询管理窗体设计及实现学生查询管理窗体命名为QueryForm，界面设计如图5.5所示。该窗体可以根据学生的学号、姓名、家庭住址、学生班级以及混合查询来查询学生的相关信息，用户可选择其中的任何一种方式对学生的学号，姓名，专业，政治面貌等基本信息进行查询。图5.5 学生查询管理窗体部分功能实现的代码如下：procedure TQueryForm.Button1Click(Sender: TObject);begin/查询学号Qstr1:=;if trim(xhqedit.Text) thenQstr1:=where 学号 like %+Trim(xhqedit.Text)+%elseQstr1:=where false;QueryPd(StringGrid1,Qstr1);end;procedure TQueryForm.Button2Click(Sender: TObject);begin/可以实现模糊查询与精确查询Qstr1:=;if trim(NameEdit.Text)thenQstr1:=where 姓名 like %+Trim(nameedit.Text)+%elseQstr1:= where false;QueryPd(StringGrid2,Qstr1);end;5.2.4 学生管理模块设计及实现1. 学生基本信息管理模块功能：1). 按学期注册。2). 添加学生基本信息记录。3). 编辑学生基本信息。4). 个人财物处理。5). 学生离校处理。2. 学生注册窗体设计及实现学生注册窗体命名为RegForm ，界面设计如图5.7所示。通过该窗体可对入学新生，进行注册登记，便于公寓的统一管理和查考。图5.7 学生注册窗体3. 学生基本信息录入窗体设计及实现学生信息窗体命名为InputForm，界面设计如图5.8所示。公寓管理员在添加学生信息时，程序会识别填写的信息是否完整，当学号、姓名、班级、寝室号、家庭住址和联系方式六个文本框中，有任意一个没有填写，程序都会弹出信息框来提醒用户把信息填写完整。图5.8 学生基本信息录入窗体设计当用户填写信息完整以后，程序首先会在学生信息表中检测学号是否重复，因为学号是学生的唯一标识，如果重复，程序会提醒用户。其次程序会根据公寓信息表和寝室信息表来检测用户所填的公寓号与寝室号是否存在，如果不存在，程序会弹出信息框提醒用户。最后，程序会根据用户所填的公寓号和寝室号，从学生信息表与寝室表中查询，该寝室的可住人数，如果寝室人数已经达到该寝室可住上限，那么程序会提醒用户进行修改，以免造成错误。在用户修改学生所住寝室信息的时候，程序也会自动检测。isempty函数是判断相应的字段是否为空，判断传递过来的对象是否与已知对象相同。若相同再判断是不是空的，实现代码如下：function IsEmpty1(Sender:Tobject):boolean;beginif (sender is Tedit) then /判断是否为Tedit控件 if trim(sender as Tedit).Text)= then begin showmessage(请输入数据); result:=false; (sender as tedit).SetFocus; end;if (sender is Tcombobox) then /判断是否为Tcombobox if trim(sender as Tcombobox).Text)= then begin result:=false; showmessage(请输入数据); (sender as Tcombobox).SetFocus; exit; end;if (sender is TDatetimePicker) then /判断是否为TDateTimePicker if trim(datetimetostr(sender as TDateTimePicker).DateTime)= then begin result:=false; showmessage(请输入数据); (sender as TDateTimePicker).SetFocus; exit; end;result:=true;end;窗体中checkbox 过程是当修改是判断当前记录的值。在combobox中的位置。以及移到相应的值上面,代码的实现为：procedure checkcom(Sender:TObject;str:string);vari:integer;beginfor i:=0 to (sender as Tcombobox).Items.Count-1 dobegin (sender as Tcombobox).ItemIndex:=i; if (sender as Tcombobox).Text=str then exit;end;4. 学生财产登记窗体设计及实现空床统计窗体命名为GRZZForm，界面设计如图5.6所示。该窗体可以对学生的个人财物进行统一的管理，这样可以方便用户对学生的入住进行有序的安 排，也避免了学生之间因为财物而引起的争吵。如果学生要求换寝室，或者学生在上学期走读，这学期需要住宿的时候，通过该界面可以快速帮助用户找