delphi+sql200公寓管理系统.doc

Delphi课程设计报告姓名：朱大鹏计科系022班学号：0204111085【设计题目】公寓管理系统【设计目的】.熟悉delphi编程的环境；.熟练使用SQLServer数据库，及SQL；.能够系统地规划程序设计的步骤；.做一个合理、有效的系统，方便公寓管理；【系统分析】公寓管理系统是为方便管理公寓日常事务的系统，它应该具备的功能有：建立设置楼层信息，建立必要的学生档案，及学生的住宿情况，删除过期的学生档案，可以按多种方式查询学生的档案，登记来访人员的信息，登记贵重物品的搬出情况，记录和排序各寝室的卫生评比情况（尚未实现），记录各寝室的财产状况，等等。要尽可能使系统人性化（易操作，界面友好），健壮（尽量避免系统错误，对用户的误操作加以限制）以及节省系统资源，等等。【概要设计】【详细设计】本系统所用的是SQLServer数据库，用到了以下五个表：本系统主要由菜单驱动，其主要功能描述如下：1.登陆窗口：procedureTForm_flash.SpeedButton1Click(Sender:TObject)；varlogname,pawor:string；beginquery1.Close；query1.SQL.Clear；logname:=ComboBox1.Text；query1.SQL.Add(select*fromuserinfowhereusername=:usernameandpassword=:password)；query1.ParamByName(username).AsString:=ComboBox1.Text；query1.ParamByName(password).AsString:=Edit1.Text；query1.Open；ifquery1.RecordCount>=1thenbeginpawor:=query1.FieldList.Fields2.Value；/获得用户权限application.CreateForm(Tform_main,form_main)；form_flash.Free；form_main.Show；form_main.StatusBar1.Panels1.Text:=logname；form_main.StatusBar1.Panels3.Text:=pawor；ifpawor=超级用户thenform_main.menu_config_uesr.Enabled:=true；/超级用户可以使用用户设置菜单项endelsebeginshowmessage(Error:密码错误！)；edit1.Text:=；edit1.SetFocus；end；end；2.主窗体：procedureTForm_main.Timer1Timer(Sender:TObject)；