delphi+sql200公寓管理系統(tǒng).doc

Delphi課程設(shè)計報告姓名：朱大鵬計科系022班學(xué)號：0204111085【設(shè)計題目】公寓管理系統(tǒng)【設(shè)計目的】.熟悉delphi編程的環(huán)境；.熟練使用SQLServer數(shù)據(jù)庫，及SQL；.能夠系統(tǒng)地規(guī)劃程序設(shè)計的步驟；.做一個合理、有效的系統(tǒng)，方便公寓管理；【系統(tǒng)分析】公寓管理系統(tǒng)是為方便管理公寓日常事務(wù)的系統(tǒng)，它應(yīng)該具備的功能有：建立設(shè)置樓層信息，建立必要的學(xué)生檔案，及學(xué)生的住宿情況，刪除過期的學(xué)生檔案，可以按多種方式查詢學(xué)生的檔案，登記來訪人員的信息，登記貴重物品的搬出情況，記錄和排序各寢室的衛(wèi)生評比情況（尚未實現(xiàn)），記錄各寢室的財產(chǎn)狀況，等等。要盡可能使系統(tǒng)人性化（易操作，界面友好），健壯（盡量避免系統(tǒng)錯誤，對用戶的誤操作加以限制）以及節(jié)省系統(tǒng)資源，等等?！靖乓O(shè)計】【詳細設(shè)計】本系統(tǒng)所用的是SQLServer數(shù)據(jù)庫，用到了以下五個表：本系統(tǒng)主要由菜單驅(qū)動，其主要功能描述如下：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；/獲得用戶權(quán)限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；/超級用戶可以使用用戶設(shè)置菜單項endelsebeginshowmessage(Error:密碼錯誤！)；edit1.Text:=；edit1.SetFocus；end；