【正文】 系統(tǒng)開發(fā)方法的選擇和開發(fā)計劃的制定：針對已經(jīng)確定的開發(fā)策略選定相應(yīng)的開發(fā)方法，是結(jié)構(gòu)化系統(tǒng)分析和設(shè)計方法，還是選擇原型法或面向?qū)ο蟮姆椒ā? 管理信息系統(tǒng)開發(fā)方法主要有：結(jié)構(gòu)化生命周期開發(fā)方法、原型法，面向?qū)ο蟮?開發(fā)方法等。其基本思想是：用系統(tǒng)的思想和系統(tǒng)工程的方法，按用戶至上的原則，結(jié)構(gòu)化、模塊化地自上而下的對生命周期進行分析與設(shè)計。結(jié)構(gòu)化生命周期開發(fā)方法嚴格區(qū)分了開發(fā)階段，非常重視文檔工作，對于開發(fā)過程中 出現(xiàn)的問題可以得到及時的糾正，避免了出現(xiàn)混亂狀態(tài)。 原型法 原型法在系統(tǒng)開發(fā)過程中也得到不少的用應(yīng)。原型法的用應(yīng)使人們對需求有了漸進的認識，從而使系統(tǒng)開發(fā)更有針對性。 原型法的最大的問題是難于對開發(fā)過程進行管理及控制，其次是“原型”的設(shè)計難度較大，需要較高層次的設(shè)計人員，原型法目前還是一個不夠成熟和普遍應(yīng)用的方法，但隨著第四代語言、面向?qū)ο蟆④浖陀眉夹g(shù)的發(fā)展和普及，原型法也將會有更大發(fā)展。這樣，既能較好地確定系統(tǒng)開發(fā)目標，又能較快地交互開發(fā)實現(xiàn)所確定的系統(tǒng)。面向?qū)ο蟮南到y(tǒng)開發(fā)方法的基本思想是將客觀世界抽象地看成是若干相互聯(lián)系的對象，然后根據(jù)對象和反復法的特性研制出一套軟件工具，使之能夠映射為計算機軟件系統(tǒng)結(jié)構(gòu)模型和進程，從而實現(xiàn)信息系統(tǒng)的開發(fā)。結(jié)構(gòu)化方法以功能分解為基礎(chǔ)，系統(tǒng)的功能在系統(tǒng)內(nèi)外環(huán)境急劇變化時很不穩(wěn)定。程序設(shè)計的思想方法越來越接近人們思維方式。因此，軟件工作進一步向用戶靠近，這對于計算機應(yīng)用深入到各個領(lǐng)域是十分有利的。面向?qū)ο蟮母鞣N方法正在進一步的發(fā)展，并形成了逐步合流的趨勢。 方法的選擇 本次系統(tǒng)開發(fā)我選擇了結(jié)構(gòu)化生命周期開發(fā)方法。系統(tǒng)規(guī)劃方法有戰(zhàn)略目標集轉(zhuǎn)化法（ SST, Strategy set transformation）、關(guān)鍵成功因素法（ CSF， Critical success factors）和企業(yè)規(guī)劃法（ BSP, Business system planning）。 ● 系統(tǒng)設(shè)計階段：主要任務(wù)是確定系統(tǒng)的總體設(shè)計方案、劃分子系統(tǒng)功能、確定共享數(shù)據(jù)的組織，然后進行詳細設(shè)計，如處理模塊的設(shè)計、數(shù)據(jù)庫系統(tǒng)的設(shè)計、輸入輸出界面的設(shè)計和編碼的設(shè)計等。 ● 系統(tǒng)運行階段：主要任務(wù)是進行系統(tǒng)的日常運行管理，評價系 統(tǒng)的運行效率，對運行費用和效果進行監(jiān)理審計，如出現(xiàn)問題則對系統(tǒng)進行修改、調(diào)整。結(jié)構(gòu)化生命周期開發(fā)方法嚴格區(qū)分了開發(fā)階段，非常重視文檔工作，對于開發(fā)過程中出現(xiàn)的問題可以得到及時的糾正，避免了出現(xiàn)混亂狀態(tài)。 第二章 系統(tǒng)分析及需求分析 功能需求分析 為了房屋管理者更好地管理房屋的合同、租金等一系列問題，也為了讓租房者更方便地了解待 租房屋的情況，現(xiàn)開發(fā)一個房屋出租管理系統(tǒng)。對于用戶來講，主要包括的功能模塊有：房屋管理、合同管理、租金管理、統(tǒng)計和系統(tǒng)維護等。 本系統(tǒng)的設(shè)計就是根據(jù)房東和房客的需要，為房東提供主要以房產(chǎn)及出租業(yè)務(wù)管理為基本要求，為房客提供房產(chǎn)信息咨詢。當用戶輸入用戶名和密碼后經(jīng)過確認，才能進入房產(chǎn)管理 系統(tǒng)。 : 該模塊是用戶登錄后進入的第一個模塊，主要用于用戶對房屋及其業(yè)務(wù)的情況進行管理，其中包括： 房產(chǎn)信息管理模塊 : 主要用于房產(chǎn)信息的插入、刪除、修改、保存等基本操作。 : 該模塊是用戶對合同信息的基本情況進行管理。 到期合同處理 : 主要對到期的合同進行處理 ，若合同已到期，可結(jié)束其使用權(quán)。 合同總表瀏覽 : 用于查看合同信息的總體情況。主要包括有： 租金收取 : 用于收取租金時對租金的收取情況的管理。 按發(fā)票號租金查詢 : 輸入想要查詢的發(fā)票號，可查出該發(fā)票的租金相干情況。具體包括有： 本月租金統(tǒng)計 : 用 于對所輸入年月的租金進行統(tǒng)計。 到期合同統(tǒng)計 : 即對已到期的合同進行統(tǒng)計。 : 該模塊用于對本系統(tǒng)的基本信息進行管理。 數(shù)據(jù)恢復 : 用于恢復文件和數(shù)據(jù)。 ： 主要是讓想了解房產(chǎn)的人對所要了解的信息進行查詢。 房屋咨詢 : 對所想租的房屋類型進行咨詢，看是否有符合條件的。其目的是為一個組織中各個部門和各個管理層次提供必要的管理信息和決策數(shù)據(jù)，由于它涉及到應(yīng)用領(lǐng)域中一定的深度和廣度，因而必然要接觸大量的不同類型的數(shù)據(jù)。 數(shù)據(jù)庫的需求分析 數(shù)據(jù)庫需求分析是數(shù)據(jù)庫設(shè)計的第一階段也是很重要的一個階段，它是收集基本數(shù)據(jù)以及數(shù)據(jù)處理的流程，為以后進一步設(shè)計打下基礎(chǔ)，需求分析主要解決兩個問題： 內(nèi)容要求 :弄清應(yīng)用系統(tǒng)用戶所需要操作的數(shù)據(jù)，決定在數(shù)據(jù)庫中存儲什么數(shù)據(jù)。 數(shù)據(jù)項 : 包括名稱、含義、類型、取值范圍、長度以及和其它數(shù)據(jù)項之間的邏輯關(guān)系。 數(shù)據(jù)結(jié)構(gòu) : 若干數(shù)據(jù)項的有意義的集合，包括名稱、含義以及組成數(shù)據(jù)結(jié)構(gòu)的數(shù)據(jù)項 數(shù)據(jù)庫概念結(jié)構(gòu)設(shè)計 概念結(jié)構(gòu)設(shè)計的主要任務(wù)是根據(jù)用戶 需求設(shè)計數(shù)據(jù)庫的概念數(shù)據(jù)模型（簡稱概念模型）。 本系統(tǒng)包括的數(shù)據(jù)項有： 用戶表：用戶號，用戶名，密碼。 合同表：合同號，租期，起租日期，到期日期，付款期限，月租金，租金總額，押金，乙方單位，聯(lián)系人，電話，手機，備注，標志。 本系統(tǒng)采用實體聯(lián)系圖 —— ER圖來描述用戶需求的實體與聯(lián)系。 Microsoft SQL server 是一個高性能的關(guān)系型數(shù)據(jù)庫管理系統(tǒng)，它具有客戶機 /服務(wù)器體系結(jié)構(gòu)，能夠滿足大規(guī)模分布式計算環(huán)境的需要。 （ 2）簡單的圖形化管理工具。 （ 4）豐富的編程接口工具。 （ 6） SQL server 是 Microsoft 服務(wù)器套件 BackOffice 的成員之一，它與其它軟件（ Windows 20 Inter Information Server、 Exchange Server 等）有機結(jié)合，并充分利用它們所提供的服務(wù)或功能，從而增強了 SQL server 數(shù)據(jù)庫系統(tǒng)的功能，同時占用較少的資源。 開發(fā)工具的選擇 在 PB、 VB、 DELPHI 中，我選擇 作為本系統(tǒng)的前端開發(fā)工具。 支持應(yīng)用系統(tǒng)同時訪問多種數(shù)據(jù)庫為方便用戶截面的開發(fā)， 提供了大量的控件，這既加快了項目的開發(fā)進度。 系統(tǒng)功能模塊的創(chuàng)建 在 DELPHI 中，應(yīng)用程序通過一個工程 Project 來實現(xiàn)，而工程通過多個窗體 Form 來實現(xiàn)應(yīng)用程序所具有的功能。在打開主窗口之前有一個登錄窗口供用戶選擇。登錄窗體布局如下： 房 屋 出 租 管 理 系統(tǒng) 用 戶 登 錄 窗 體 游客瀏覽主窗體 房屋管理主窗體 房價查詢窗體 房產(chǎn)咨詢窗體 有房出租窗體 房產(chǎn)管理窗體 合同管理窗體 租金管理窗體 信息統(tǒng)計窗體 系統(tǒng)維護窗體 幫助窗體 圖 42 登陸主窗口 表 41窗體中主要的對象屬性所示 對象名 屬性 取值（說明） denglu (form) caption 登錄 position poscreencenter ADOConnection1 name ADOConnect1 (ADOConnection) Defaultdatabase house Connected true Loginprompt false ADOdataset1 (ADODataset) Name ADODataset1 Connection ADOconnection1 Active false Commandtext 用戶名，密碼 Edit1 (Edit) Text (空 )用于輸入用戶名 Edit2 (Edit) PasswordChar *(所有輸入都顯示為指定的字符 ) Button1(Button) Caption 用戶登錄 Button2(Button) Caption 游客瀏覽 Button3(Button) Caption 退出 用戶登錄在 Button1的 OnClick事件處理程序中完成，當確認用戶名和密碼后，登錄到房屋管理窗體；如不是用戶，可以進入游客瀏覽窗體，代碼如下： procedure (Sender: TObject)。 //關(guān)閉 ADOdataset :=39。 (39。).Value := 。 if ( =1) and (trim((39。).Value) = ) then //判斷密碼是否正確和用戶名是否存在 begin 。 end else ShowMessage(39。)。 procedure (Sender: TObject)。 //進入游客瀏覽主窗口 end。 begin close。 房屋管理系統(tǒng)窗體的設(shè)計 該窗體為房屋管理者的主窗體，包括了菜單的設(shè)計，窗體的布局如下： 圖 43 房屋管理系統(tǒng)主界面 菜單的設(shè)計如下圖： 圖 44 菜單設(shè)計 以下代碼主要用來顯示各窗體，具體代碼有： procedure (Sender: TObject)。 //顯示房產(chǎn)信息管理窗體 end。 begin 。 procedure (Sender: TObject)。 //顯示合同信息管理窗體 end。 begin 。 procedure (Sender: TObject)。//顯示合同信息查詢窗體 end。 begin 。 procedure (Sender: TObject)。 //顯示租金收取窗體 房產(chǎn)管理 合同管理 租金管理 信息統(tǒng)計 系統(tǒng)維護 背景 幫助 房產(chǎn)信息管理 房產(chǎn)總表瀏覽 合同信息管理 到期合同處理 合同信息查詢 合同總表瀏覽 租金收取 按合同號查詢 按發(fā)票號查詢 租金信息統(tǒng)計 到期 合同統(tǒng)計 履約金統(tǒng)計 空閑房屋統(tǒng)計 數(shù)據(jù)備份 數(shù)據(jù)恢復 密碼管理 天堂 城堡 雪松 樓房一 樓房二 幫助主題 系統(tǒng)幫助 end。 begin 。 procedure (Sender: TObject)。 //顯示按發(fā)票號查詢窗體 end。 begin 。 procedure (Sender: TObject)。 //顯示已到期合同統(tǒng)計窗體 end。 begin 。 procedure (Sender: TObject)。 //顯示空閑房屋統(tǒng)計窗體 end。 begin 。 procedure (Sender: TObject)。 //顯示數(shù)據(jù)恢復窗體 end。 begin 。 procedure (Sender: TObject。 begin 。 procedure (Sender: TObject)。 //顯示幫助主題窗體 end。 var CanClose: Boolean)。是否退出？？？ 39。 end。 var xs,fz,m : string。 if MinuteOf(now) 10 then fz := 39。+inttostr(minuteof(now)) else fz := inttostr(minuteof(now))。039。 [3].Text := xs+39。+fz+39。+m。 procedure (Sender: TObject)。 begin := true。 年 39。 月39。日 39。 [1].Width := 370。 //設(shè)置準確時間的變化 procedure (Sender: TObject)。 end。 begin 。 procedure (Sender: TObject)。 //顯示關(guān)于系統(tǒng)窗體 end。 begin 。 procedure (Sender: TObject)。.\pic\39。 := true。 := false。 //顯示背景天堂 procedure (Sender: TObject)。.\pic\39。 := false。 := false。 //顯示背景城堡 procedure (Sender: TObject)。.\pic\39。 := false。 := true。 //顯示背景雪松 procedure (Sender: TObject)。.\pic\39。 := false。 := false。 end。 begin (39。)。 := false。 :=false。 end。 begin 。 end。 begin 。 end。 begin 。 end。 begin 。 end。 begin 。 procedure (Sender: TObject)。如果刪除，記錄將不能恢復，是否確定？ 39。 :=