【正文】
統(tǒng)都是為了適應(yīng)小區(qū)物業(yè)管理的需要。⑶編程中,我在指導(dǎo)老師和同學(xué)的幫助下并結(jié)合了自己的實際水平,在圖書館查閱了大量資料后盡量使軟件界面完美化。 系統(tǒng)開發(fā)環(huán)境此系統(tǒng)是基于Windows 2000 網(wǎng)絡(luò)環(huán)境的數(shù)據(jù)庫管理屬,后臺數(shù)據(jù)庫采用 SQL Server2000,前端使用 Delphi 進(jìn)行開發(fā)。Delphi是一種優(yōu)秀的可視化軟件開發(fā)工具,它以其簡潔明快的編程語言、功能強(qiáng)大的組件和靈活方便的編程環(huán)境在競爭激烈的市場越來越得青睞。因而,被稱作是“第四代程程語言”。Delphi以其友好的可視化開發(fā)環(huán)境、完全編譯執(zhí)行的高效性而著稱。Delphi同時支持COM和CORBA接口的最新功能,對于想在對象結(jié)構(gòu)標(biāo)準(zhǔn)的紛爭中立于不敗之地的IT部門而言,它是最具吸引力的選擇。Delphi擁有及其強(qiáng)大的數(shù)據(jù)庫操作能力,包括支持對Windows NT Services的開發(fā),面支持大型數(shù)據(jù)庫,如Oracle,新的靈活的Grid控件,一步到位的COM和CORBA的控件開發(fā)等。它為需要使用大量內(nèi)存的數(shù)據(jù)應(yīng)用程序(例如大型電子商務(wù)、數(shù)據(jù)倉庫和分析應(yīng)用程序)提供了具有更高水平的單系統(tǒng)伸縮性。Microsoft SQL Server是一個高性能的關(guān)系型數(shù)據(jù)庫管理系統(tǒng),它具有客戶機(jī)/服務(wù)器體系結(jié)構(gòu),能夠滿足大規(guī)模分布式計算環(huán)境的需要。 本系統(tǒng)是以Delphi ,SQL Server2000為后臺,因此要求系統(tǒng)運(yùn)行在:Windows 2000 系統(tǒng)運(yùn)行時對數(shù)據(jù)的保密性要求不高對一般的數(shù)據(jù)不要求進(jìn)行加密。硬件條件:586 CPU以上軟件條件:Windows 2000/Windows XP 本系統(tǒng)有較好的可維護(hù)性、可靠性、可理解性、效率??删S護(hù)性包括了可讀性、可修改性、可測試性、等含義。開發(fā)過程中,在各種矛盾的目標(biāo)之間作權(quán)衡,并在一定的限制的條件下(經(jīng)費(fèi)、時間、可用的軟、硬件資源等),使上述各方面最大限度的得到滿足。 系統(tǒng)管理模塊詳細(xì)介紹系統(tǒng)管理員功能實現(xiàn)權(quán)限管理的界面如下圖所示:圖41 權(quán)限管理界面在這里我用了一個CheckListBox控件來對各種權(quán)限進(jìn)行選擇以實現(xiàn)對權(quán)限的控制和分配,使用CheckListBox控件的好處是可以實現(xiàn)多種權(quán)限的復(fù)合選擇,使用一個TreeView控件來把不同的用戶以樹的形式顯示出來,在點(diǎn)擊左邊樹上的用戶名時,在右邊的權(quán)限選擇框里顯示當(dāng)前用戶的權(quán)限,這個模塊的核心代碼如下:procedure (Sender: TObject)。 a: int64。 for i := 0 to 1 do if [i] then a := a or (1 shl i)。 a := a xor 1234567890。用戶編號39。 //用戶數(shù)據(jù)表進(jìn)入可以編輯狀態(tài) (39。).Asstring := inttostr(a)。 intptr(^).qx := a。在數(shù)據(jù)庫中沒有找到該用戶的信息,請重新錄入信息!39。end。 住戶信息管理模塊詳細(xì)設(shè)計用戶信息的增加,刪除,修改的界面如下圖所示(使用一個PageControl控件實現(xiàn)各種信息管理之間的切換): 圖51 住戶資料管理界面在設(shè)計這個模塊時,我使用了ADOTable,DataSource和DBGrid控件實現(xiàn)了對數(shù)據(jù)庫的連接,并把數(shù)據(jù)庫中的數(shù)據(jù)以表的形式顯示在界面中,在操作界面中使用DBLookupComboBox控件實現(xiàn)以下拉菜單的形式選擇房型和使用狀況等信息,使用ADODataSet控件實現(xiàn)數(shù)據(jù)庫的連接,結(jié)合以上兩個控件,可以使房型數(shù)據(jù)庫中的數(shù)據(jù)以下拉列表的形式顯示出來,核心代碼如下:procedure (Sender: TObject)。 := 39。 with do begin with do begin //從數(shù)據(jù)庫中得到所有的房型數(shù)據(jù) Close。SELECT 房型 FROM ModelTable39。 end。 KeyField := 39。 if 0 then ListFieldIndex := 0。不能夠新增記錄,沒有房型資料39。 end。 。住戶基本信息查詢模塊的界面如下圖所示:圖52 住戶信息查詢界面在這個界面中我使用了ADOQuery,DataSource和DBGrid控件來實現(xiàn)數(shù)據(jù)庫的查詢,并把查詢出來的數(shù)據(jù)顯示在表格中,使用ADOQuery控件可以使查詢更為方便快捷,這里用到了數(shù)據(jù)庫的連接和查詢,通過SQL語句實現(xiàn)了住戶信息表和房屋信息表通過相同的住戶編號進(jìn)行連接,然后取出兩個表中的數(shù)據(jù)顯示在表中,核心代碼如下:begin 。 (39。)。where = and39。 (39。39。++39。39。)。end。 報修信息管理模塊詳細(xì)設(shè)計用戶報修信息的錄入,修改和刪除界面如下圖所示: 圖61 報修信息管理界面?zhèn)}庫中維修物資的數(shù)量減去完成報修所需要的維修物資的數(shù)量重新存儲到數(shù)據(jù)庫中,更新維修物資的數(shù)量,其主要代碼如下:procedure (Sender: TObject)。39。物料名稱空缺!39。 first。 if locate(39。,trim(),[]) then begin edit。維修物資數(shù)量39。維修物資數(shù)量39。 begin if strtoint(fieldbyname(39。).AsString)strtoint()5 then showmessage(39。) end。 except showmessage(39。) end。沒有此物料名稱,請核實!39。 。 end。if checkdata then try 。維修完成,倉庫數(shù)據(jù)已更新!39。 except end。 := IntToStr()。 := 。39。SELECT sum(服務(wù)費(fèi)用) FROM ZHBXTable39。 end。 := 39。 with do begin Close。 CommandText := 39。 CommandText := 39。 open。 := 。COLUMN139。 := 。39。SELECT sum(費(fèi)用合計) FROM ZHBXTable39。 end。 := 39。end。 收費(fèi)信息管理模塊詳細(xì)設(shè)計住戶收費(fèi)項目主要實現(xiàn)了住戶繳納費(fèi)用信息的錄入,修改和刪除。查詢界面如下圖所示:查詢實現(xiàn)的核心代碼如下:var ksrq,jsrq,sqlstr:string。 jsrq:=datetimetostr()。select * from ClientPayTable where (繳費(fèi)日期=39。39。39。)and(繳費(fèi)日期=39。39。39。 )39。 。 。procedure (Sender: TObject)。 。select * from ClientPayTable where 住戶名稱 like 39。%39。%39。39。 。8 系統(tǒng)登錄模塊此界面的功能是提供用戶登錄進(jìn)入本系統(tǒng)所用,是系統(tǒng)的身份驗證中心,在此進(jìn)行用戶賬號和密碼的驗證。另外界面中設(shè)置了下拉列表方便用戶進(jìn)行身份選擇。 qx: int64。 //每單擊一次‘確定’按鈕,密碼輸入次數(shù)加1 mm := trim((39。).AsString)。用戶權(quán)限39。 //取得該用戶在數(shù)據(jù)庫中的操作權(quán)限 if (mm = trim()) and (qx 1000000000) then begin := [39。]。用戶權(quán)限39。 := StrToInt64([39。])。 。登錄時間39。 (39。).AsVariant := 。 。操作員編號39。 iniapp(qx)。密碼不對,請重新錄入!39。 。 end else begin showmessage(39。)。 exit。對不起,你沒有通過口令認(rèn)證!39。 。end。下面來說一下本程序的各個模塊的功能。權(quán)限認(rèn)證窗口:在權(quán)限認(rèn)證窗口中輸入正確的用戶名和對應(yīng)的密碼按確認(rèn)進(jìn)入系統(tǒng)主窗口進(jìn)行瀏覽與操作,若用戶名和對應(yīng)的密碼不正確將不能進(jìn)入主窗口。為防止用戶以外的人看到密碼,密碼輸入框內(nèi)的密碼用“主窗口:主窗口是本軟件的核心,百分之九十的功能代碼都在這里實現(xiàn)。主窗口是一組菜單項,實現(xiàn)功能的切換和數(shù)據(jù)的處理。各類子窗體:主要實現(xiàn)小區(qū)物業(yè)管理的各項功能。硬件需求:⑴ 計算機(jī):Intel 兼容計算機(jī)Pentium 166 MHz 以上⑵ 內(nèi)存RAM: 64 MB以上⑶ 硬盤空間:SQL Server2000 完全安裝Full 180 MB軟件要求:推薦操作系統(tǒng)是Windows2000/WindowsXP。 系統(tǒng)運(yùn)行與操作指南⑴ 進(jìn)入權(quán)限認(rèn)證選擇界面,選擇用戶名,輸入用戶密碼,點(diǎn)擊“登錄按鈕即可進(jìn)入系統(tǒng)主界面;若想退出系統(tǒng),點(diǎn)擊“退出”按鈕。如果輸入的用戶姓名和用戶密碼不符合數(shù)據(jù)庫里的密碼表信息將會出現(xiàn)一個對話框提示:密碼不對,請重新輸入。如果用戶認(rèn)證正確則進(jìn)入主窗體。⑶通過在主窗體中點(diǎn)擊住戶資料錄入編輯進(jìn)入住戶資料管理模塊,可以點(diǎn)擊“增加”按鈕添加住戶信息,點(diǎn)擊“刪除”按鈕刪除用戶信息。⑸ 在主窗體中點(diǎn)擊統(tǒng)計報表與查詢下拉菜單中的物業(yè)收費(fèi)統(tǒng)計查詢可以進(jìn)入收費(fèi)統(tǒng)計查詢管理模塊,可以通過選擇開始和結(jié)束日期或者輸入用戶名查詢繳費(fèi)記錄。在同樣的下拉菜單下可以實現(xiàn)密碼的修改。10 系統(tǒng)評價 系統(tǒng)主要功能,特色/優(yōu)點(diǎn)介紹 系統(tǒng)功能簡介本程序設(shè)計的是一個小區(qū)物業(yè)管理程序,主要是按照小區(qū)物業(yè)管理問題,來開發(fā)的一個系統(tǒng),目標(biāo)是使小區(qū)物業(yè)管理的數(shù)據(jù)信息化、快速化和網(wǎng)絡(luò)化。本系統(tǒng)共分為住戶信息管理、物業(yè)信息管理、收費(fèi)信息管理、投訴信息管理、報修信息管理以及維修物資信息管理、系統(tǒng)管理等模塊,其功能基本涵蓋了小區(qū)物業(yè)管理的各個方面。數(shù)據(jù)庫管理系統(tǒng)采用SQL SERVER 2000,采用Delphi ,系統(tǒng)的應(yīng)用規(guī)模可以根據(jù)用戶的需要動態(tài)配置;(3)有機(jī)結(jié)合計算機(jī)自動處理與人工處理;(4)用戶界面友好,模塊清晰,操作簡單,使用方便,一看就懂,一學(xué)就會; (5)擴(kuò)充性好,發(fā)展?jié)摿Υ螅灰肓松矸蒡炞C模塊保密工作做到了實處; 系統(tǒng)存在的不足與改進(jìn)方案 系統(tǒng)存在的不足由于時間比較倉促,所以本系統(tǒng)還不是太完善,比如說身份驗證模塊比較簡單,可能對保密性要求不是非常的高,關(guān)于小區(qū)物業(yè)只保證了一些重要功能的實現(xiàn),還有一些方面沒有涉及到,比如說保安管理,保潔綠化管理和物業(yè)的一些基本設(shè)施的管理都沒能在系統(tǒng)中體現(xiàn)出來,在一些細(xì)節(jié)的處理方面還存在著不足,部分?jǐn)?shù)據(jù)庫表的設(shè)計存在一定的冗余,有待進(jìn)一步優(yōu)化。美觀方面當(dāng)然是提高審美觀點(diǎn),盡可能做到界面美觀,可視化并且要方便管理人員使用;功能方面要擴(kuò)大此系統(tǒng)的功能,以前沒有時間實現(xiàn)的現(xiàn)在要實現(xiàn)出來并且進(jìn)行功能的擴(kuò)充;技術(shù)方面的改進(jìn)表現(xiàn)在系統(tǒng)雖然基本上實現(xiàn)了功能要求,但很多方面還沒有考慮仔細(xì),像實現(xiàn)某一功能可以用多個控件,到底用哪個控件最好、最合適、速度最快還是需要重點(diǎn)考慮的,還要簡化程序代碼,可使不同界面之間能共享一些方法、函數(shù)和變量,數(shù)據(jù)庫的關(guān)系模式可以進(jìn)一步規(guī)范化,減少冗余現(xiàn)象還有許多不足的地方也要盡可能的找出來?!凹埳蠈W(xué)來終覺淺”,在沒開始動手做畢業(yè)設(shè)計的時候,覺得這么一個小型的管理系統(tǒng)應(yīng)該是比較容易完成的,無非是對一些控件的調(diào)用以及數(shù)據(jù)庫編程。通過這次的畢業(yè)設(shè)計,我學(xué)到了很多。另外,我對管理信息系統(tǒng)(MIS)的概念有了一定的了解。本次設(shè)計中, 我們對管理信息系統(tǒng)的歷史、一般模式、系統(tǒng)分析與系統(tǒng)設(shè)計、開發(fā)工具功能等有一個較為全面深刻的認(rèn)識。在設(shè)計的過程當(dāng)中也學(xué)到了團(tuán)隊合作精神,與同學(xué)共同解決問題,增加了與其他同學(xué)交流和向其學(xué)習(xí)的機(jī)會,鍛煉了自己的交際能力,學(xué)到別人的長處,認(rèn)清自己的短處,并努力改進(jìn)。結(jié) 論小區(qū)物業(yè)管理程序,主要是按照小區(qū)物業(yè)管理問題,來開發(fā)的一個系統(tǒng),目標(biāo)是使小區(qū)物業(yè)管理的數(shù)據(jù)信息化、快速化和網(wǎng)絡(luò)化。為期一個學(xué)期的畢業(yè)設(shè)計終于走到了終點(diǎn),過去的一個學(xué)期里所做的工作仍歷歷在目,從一開始對整個系統(tǒng)感到茫然,到對系統(tǒng)的大致框架有了一定的了解,到數(shù)據(jù)庫表的建立,再到一個個模塊的完成,到最終整個系統(tǒng)的完工,在這段過程中我遇到了無數(shù)的困難,但是在指導(dǎo)老師和同學(xué)們的幫助下,我終于堅持了過來。對于此系統(tǒng)要從美觀、功能和技術(shù)上三個方面做重點(diǎn)改進(jìn)??傮w說來,在這次一個學(xué)期的畢業(yè)設(shè)計中,我學(xué)到了很多在課堂內(nèi)學(xué)不到的知識。我覺得通過這次畢業(yè)設(shè)計,我受益匪淺。我要特別感謝的是我的指導(dǎo)老師陳艷艷老師,感謝她對我的支持,感謝她對我有時的無知的容忍,感謝她對我時刻的督促,正是這樣才最大限度的激發(fā)了我的潛能。另外,我們還要感謝系領(lǐng)導(dǎo)和各位老師,是他們給我提供了如此好的學(xué)習(xí)和設(shè)