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

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