【正文】 開發(fā)的生命周期。 系統(tǒng)功能分析 本系統(tǒng)主要有以下功能要求： : 主要用于用戶的登錄。 合同信息查詢 : 用于查詢合同的使用情況和基本信息。 履約金統(tǒng)計(jì) : 對未退還的履約金進(jìn)行統(tǒng)計(jì)。包括有以下功能： 房價(jià)查詢 : 是對所要求的房屋進(jìn)行月租 金查詢，看是否滿意。 在數(shù)據(jù)庫需求分析后，應(yīng)該得到一個(gè)數(shù)據(jù)字典文檔，包括 3 個(gè)方面的內(nèi)容： 房產(chǎn)表：房屋號，坐落位置，面積，類型，狀態(tài)，合同號，基本月租金。 （ 3）隱含的迸發(fā)控制能力。 還支持分布式的應(yīng)用系統(tǒng)的開發(fā)，形成 多層應(yīng)用系統(tǒng)結(jié)構(gòu)，也就是說， 不僅可以開發(fā)客戶端應(yīng)用程序，并可以生成機(jī)器代碼的可執(zhí)行文件。select 密碼 from 用戶表 where 用戶名 =:name39。 //進(jìn)入房屋管理主窗口 。 procedure (Sender: TObject)。 //顯示房產(chǎn)總表瀏覽窗體 end。 begin 。 procedure (Sender: TObject)。 //顯示租金信息統(tǒng)計(jì)窗 體 end。 begin 。 procedure (Sender: TObject)。 begin 。 //判斷是否真的退出 procedure (Sender: TObject)。+inttostr(secondof(now)) else m := inttostr(secondof(now))。 var rq :string。 [2].Text := rq。 end。 begin (39。 begin (39。 begin (39。 begin (39。 //顯示樓房一背景 procedure (Sender: TObject)。 :=true。 := false。 := false。,mtConfirmation, [mbYes, mbNo],0) = mrYes then 。 //對插入或修改的記錄進(jìn)行保存，保存后顯示“保存完畢” end。 。 :=false。 end。select * from 合同 表 where 合同號 =:hth39。).Value := 39。 showmessage(39。 :=39。 :=39。 :=39。共 39。 showmessage(39。 (39。 表 44 主要控件屬性如下 對象名 屬性 取值（說明） Form14 (form) caption 按合同號租金查詢 position poscreencenter ADOConnection1 name ADOConnect1 (ADOConnection) Defaultdatabase house Connected true Loginprompt false ADOdataset1 (ADODataset) Name ADODataset1 Connection ADOconnection1 Active false Commandtext Select *from 租金表 ADOdataset2 (ADODataset) Name ADODataset2 Connection ADOconnection1 Active false Commandtext Select * from 租金表 Datasource1 (Datasource) Name Datasource1 Dataset ADODataset1 Edit1 (Edit) Text (空 )用于輸入合同號 Edit2 (Edit) Text (空 )用于顯示所選合同號的租金收取總額 Readonly true Button1(TButton) Caption 退出 Button2(TButton) Caption 顯示 Button3(TButton) Caption 顯示全部 Button4(TButton) Caption 打印 實(shí)現(xiàn)上述功能的代碼有： “顯示”按紐的程序?yàn)椋? procedure (Sender: TObject)。).Value := 。 。 。 end。hth39。 租金信息統(tǒng)計(jì)窗口的設(shè)計(jì) 該窗體是屬于“信息統(tǒng)計(jì)”模塊的其中一個(gè)窗口。 if dayof()10 then rq1 := rq1 +39。039。).Value :=rq1。 。 if [0].Value null then :=[0].Value else :=39。 (39。 條 39。).Value:=39。select * from 合同表 where 標(biāo)志 =:bz39。+inttostr()+39。bz39。 該窗體的功能理論上是對新數(shù)據(jù)進(jìn)行保存，防止數(shù)據(jù)的丟失。name39。新密碼與確認(rèn)密碼不一致！ 39。密碼修改成功！ 39。 窗體的布局如下： 圖 420房價(jià)查詢窗口 功能 實(shí)現(xiàn)的代碼如下： procedure (Sender: TObject)。 (39。坐落位置： 39。 end。 。 end。).Value := 。).Value := 。 ②質(zhì)量：檢查每模塊的功能、性能、要求是否符合相關(guān)文檔的技術(shù)要求，不合格者，糾正錯(cuò)誤，保證質(zhì)量。 系統(tǒng)轉(zhuǎn)換的主要工作：確定了系統(tǒng)的轉(zhuǎn)換方式以后，除了做好組織準(zhǔn)備、物質(zhì)準(zhǔn)備和人員培訓(xùn)以外，最重要并且工作量最大的是數(shù)據(jù)準(zhǔn)備和系統(tǒng)初始化工作。借此論文之際，我想向所有人表示我的謝意。在 畢業(yè)設(shè)計(jì)過程中經(jīng)常給我提出許多關(guān)鍵性的問題，使我受益匪淺。同時(shí)感謝大學(xué)。本系統(tǒng)是在指導(dǎo)老師的指導(dǎo) 下修改完成的。 本次開發(fā)的賓館客房管理系統(tǒng)采用了并行轉(zhuǎn)換方式，以保證平衡可靠的過度。 測試內(nèi)容說明 測試名稱： ①“主界面”測試 ②“房產(chǎn)管理”測試③“合同管理”測試 ④“租金管理”測試 ⑤“信息統(tǒng)計(jì)”測試 ⑥“系統(tǒng)維護(hù)”測試 ⑦“背景設(shè)置”測試 測試進(jìn)度： 第一天 “主界面”測試 “房產(chǎn)管理”測試 “合同管理”測試 第二天 “租金管理”測試 “信息統(tǒng)計(jì)”測試 “系統(tǒng)維護(hù)”測試 第三天 “背景設(shè)置”測試 測試分析報(bào)告 引 言： ① 背景：近三天來，我按照測試計(jì)劃有條不紊地測試完了系統(tǒng)，發(fā)現(xiàn)了許多錯(cuò)誤，并改正了，測試完畢后，我又對測試結(jié)果進(jìn)行了分析。 end。 end。 //在 Combobox1中顯示房子類型 procedure (Sender: TObject)。select distinct 類型 from 房產(chǎn)表 39。 end。 。).Value:=。 :=39。 //修改密碼且保 存新密碼 end。 。 。 具體的功能控件屬性 功能實(shí)現(xiàn)的代碼設(shè)計(jì) 窗體布局如下圖： 圖 417 數(shù)據(jù)恢復(fù)窗口圖 密碼管理的 窗體創(chuàng)建 該窗體也是“系統(tǒng)維護(hù)”模塊的一部分，能實(shí)現(xiàn)密碼的修改。039。 end。bz39。 。 //按紐“統(tǒng)計(jì)”的實(shí)現(xiàn)代碼，即到期合同的統(tǒng)計(jì)情況 procedure (Sender: TObject)。).Value:=39。 end。ssrq139。ssrq239。 //實(shí)現(xiàn)時(shí)間的設(shè)置 。 rq1 := rq1 + inttostr(dayof())。 窗體布局如下圖： 圖 413 租金信息統(tǒng)計(jì)窗口 功能實(shí)現(xiàn)代碼如下： 功能實(shí)現(xiàn)主要點(diǎn)擊“統(tǒng)計(jì)”按紐，就可以完成，該按紐的代碼為： procedure (Sender: TObject)。 。 begin if =39。39。 //顯示所輸入合同號的租金收取總額 end。 //用于顯示所輸入合同號的租金情況 。39。).Value:=。)。 條 39。 (39。 (39。 (39。)。 (39。hth39。 本窗體能打印房產(chǎn)信息的總表，打印按紐的 clicked事件的代碼為： procedure (Sender: TObject)。 :=false。 //對所顯示的記錄進(jìn)行打印 end。 begin 。 //對記錄進(jìn)行刪除操作，并先判斷是否確定刪除 end。 顯示最后一條記錄并且隱藏保存按鈕 procedure (Sender: TObject)。 //顯示下一條記錄并且隱藏保存按鈕 procedure (Sender: TObject)。 //顯示樓房二背景 房產(chǎn)信息管理窗體的設(shè)計(jì) 圖 45信息管理窗體 表 443 主要控件對象屬性如下 對象名 屬性 取值（說明） Form4 (form) caption 房產(chǎn)管理信息 position poscreencenter ADOConnection1 name ADOConnect1 (ADOConnection) Defaultdatabase house Connected true Loginprompt false ADOdataset1 (ADODataset) Name ADODataset1 Connection ADOconnection1 Active True Commandtext Select *from 房產(chǎn)表 Datasource1 (datasource) Dataset ADODataset1 Name Datasource1 DBEdit1 (DBEdit) Datasource Datasource1 Datafield 房屋號 Name DBEdit1 Readonly true DBEdit2 (DBEdit) Datasource Datasource1 Datafield 坐落位置 Name DBEdit2 Readonly true DBEdit3 (DBEdit) Datasource Datasource1 Datafield 狀態(tài) Name DBEdit3 Readonly true DBEdit4 (DBEdit) Datasource Datasource1 Datafield 面積 Name DBEdit4 Readonly true DBEdit5 (DBEdit) Datasource Datasource1 Datafield 合同號 Name DBEdit5 Readonly true DBEdit6 (DBEdit) Datasource Datasource1 Datafield 類型 Name DBEdit6 Readonly true DBEdit7 (DBEdit) Datasource Datasource1 Datafield 基本月租 金 Name DBEdit7 Readonly true Button5(Button) Caption 插入 Button6(Button) Caption 刪除 Button7(Button) Caption 保存 Button10(Button) Caption 保存 實(shí)現(xiàn)窗體功能的代碼如下： procedure (Sender: TObject)。.\pic\39。)。)。)。)。 begin 。 end。 rq:= inttostr(yearof(now))+39。:39。 begin xs := inttostr(hourof(now))。 procedure (Sender: TObject。 //顯示密碼管理窗體 end。 procedure (Sender: TObject)。 begin 。 //顯示按合同號租金查詢窗體 end。 procedure (Sender: TObject)。 begin 。 //關(guān)閉窗口，退出應(yīng)用程序 end。用戶名或密碼錯(cuò)誤！請重新輸入 39。name39。本系統(tǒng)工程中窗體結(jié)構(gòu)圖如下圖： 圖 41 功能結(jié)構(gòu)圖 本系統(tǒng)供兩種身份的用戶進(jìn)行操作，所以有兩大主窗口。 （ 5）多線程體系結(jié)構(gòu)。 租金表：發(fā)票號，合同號，應(yīng)收日期，實(shí)收日期，應(yīng)收金額，實(shí)收金額。 ： 功能是可以查看所有可出租房屋的總體情況 功能模塊圖如下 ：