【正文】 時，將所添加的記錄編號和合同信息表中已有的編號進行比較，通過以下的語句來實現(xiàn)編號在信息表中存在時出現(xiàn)信息提示。)； exit；end； （2）租賃合同管理① 功能說明該窗體模塊主要對求租房屋的用戶和房屋擁有者所簽訂的租賃房屋合同信息的管理，通過向窗體的文本框中輸入相應的數(shù)據(jù)，對簽訂的租賃合同進行添加、添加保存、定位合同數(shù)據(jù)表中的記錄、修改記錄和刪除記錄的操作。 實用工具窗體的設計與實現(xiàn)實用工具模塊主要是計算器功能，是為了方便對出租和出售房屋進行價格的計算。窗體界面如圖511所示。幫助菜單包含幫助主題（H）和關于計算器（A）兩個子菜單，該菜單主要是簡單介紹了一下關于計算器方面的知識。 系統(tǒng)維護窗體的設計與實現(xiàn)（1）更改口令① 功能說明該窗體模塊主要是對用戶進入該系統(tǒng)時的用戶密碼的更改進行管理的操作。圖512更改口令窗口② 設計思路設計該窗體所用到的組件有：Panel組件，Label組件，Edit組件，Button組件。Button按鈕組件在該窗體中使用了兩個，分別是確定和取消。您兩次密碼輸入不一致39。).AsString:=；；showmessage(39。當向用戶編號文本框中輸入用戶編號后，單擊“定位”按鈕可以將屬于該編號的用戶數(shù)據(jù)全都顯示在窗體上。窗體界面如圖513所示。Edit組件在窗體中可以向其中輸入數(shù)據(jù)。當向窗體中添加新記錄時，將記錄的編號和用戶管理表中已經(jīng)存在的編號進行比較，下面的語句實現(xiàn)編號在用戶管理表中已經(jīng)存在時出現(xiàn)“該編號已經(jīng)存在”的提示信息。；；(39。).AsString:=；(39。).AsString:=；(39。)；數(shù)據(jù)表中的記錄很多，有一些是不需要的，可以將其刪除，通過如下代碼可以實現(xiàn)刪除記錄。警告39。39。39。設計時首先定義一個字符串STR，將存放備份后的數(shù)據(jù)的路徑賦值給定義好的字符串，然后添加備份數(shù)據(jù)的SQL語句，執(zhí)行SQL語句即可實現(xiàn)數(shù)據(jù)備份功能，主要代碼如下。backup database house to disk=39。39。數(shù)據(jù)備份成功39。c: \39。39。39。數(shù)據(jù)恢復失敗39。白盒測試法是把程序看成裝在一個透明的白盒里，也就是完全了解程序的結構和處理過程，按照程序內部的邏輯測試程序，稱為結構測試。通過在界面上新添加一個DBGrid組件，將它的Dataset設置成和房源信息表進行連接，實現(xiàn)了預期的功能。原因是沒有和合同信息表進行正確的連接，通過修改和數(shù)據(jù)表的連接使得記錄能正確的添加到數(shù)據(jù)表中，實現(xiàn)了預期的功能。在這個系統(tǒng)中，可實現(xiàn)由計算機代替人工執(zhí)行一系列諸如房源信息的查詢、客源信息的查詢、廣告管理及成交管理等操作，還可以對系統(tǒng)進行必要的維護操作，這樣就使管理人員從繁重的工作中解脫出來。我將不斷提高自己，爭取今后在編制程序時，能編寫出有個性且應用性較強的數(shù)據(jù)庫管理系統(tǒng)。其次，我要感謝我的指導老師王薇老師，系統(tǒng)從開始設計到成功的運行，王薇老師一直在指導和幫助我，她耐心的講解幫助我解決了許多技術上的難題。Begin ； ； (39。39。39。)； Exit； End； Num: =； ； ； (39。).AsString: =； (39。).AsString: =； (39。).AsString: =； (39。).AsString:=； (39。).AsString:=； (39。).AsString:=； (39。).AsString:=； (39。).AsString:=； (39。).AsString:=； (39。).AsString:=； (39。).AsString:=； (39。).AsString:=； (39。；(39。,strtodate())； If then (39。 Else (39。； If then (39。 Else (39。； If then (39。 Else (39。； If then (39。 Else (39。； If (39。 Else (39。； If then (39。 Else (39。； If then (39。 Else (39。； If then (39。 Else (39。； If then (39。 Else (39。； If then (39。 Else (39。 If then (39。 Else (39。； If then (39。 Else (39。； If then (39。 Else (39。； ； show message(39。39。,strtodate())+39。+39。+formatdatetime(39。39。)。39。39。 Exit； End； ； ； (39。).AsString:=； (39。).AsString:=； (39。).AsString:=； ； showmessage(39。)； ；End；（4）客源信息查詢主要代碼Begin If then Begin ； ； (39。++39。)； ； End； If then Begin ； ； (39。++39。)； ； End； If then Begin ； ；(39。+bsskincheck+39。)； ； End； If then Begin ； ；(39。+bsskincheck+39。)；； End； If then Begin ； ； (39。+bsskincheck+39。)； ； End； If then Begin ； ；(39。+bsskincheck+39。)； ； End；End；。39。39。39。39。39。39。39。39。39。39。39。39。)； ； ； (39。).AsString:=； (39。).AsString:=； (39。)； ； ； (39。此編號已經(jīng)存在，請輸入其他的編號39。39。select*fromkeyuanwherenum=39。)； ； If =0then Begin showmessage(39。,strtodate())+39。39。39。+formatdatetime(39。)； ；End；（2）房源信息查詢主要代碼Begin If strtodate () strtodate () then Begin End； ； ；(39。).AsString:=39。).AsString:=39。).AsString:=39。).AsString:=39。).AsString:=39。).AsString:=39。).AsString:=39。).AsString:=39。).AsString:=39。).AsString:=39。).AsString:=39。).AsString:=39。).AsString:=39。).AsString:=39。).AsString:=39。).AsString:=39。).AsString:=39。).AsString:=39。).AsString:=39。).AsString:=39。).AsString:=39。).AsString:=39。).AsString:=39。).As String:=39。).AsString: =39。).AsString:=39。).AsString:=formatdatetime(39。).AsString:=39。).AsString:=； (39。).AsString:=； (39。).AsString:=； (39。).AsString:=； (39。).AsString:=； (39。).AsString:=； (39。).AsString:=； (39。).AsString:=； (39。).AsString:=； (39。).AsString:=； (39。).AsString: =； (39。)； ； ； (39。)； ； If 0 then Begin show message(39。++39。)； ； ； ； (39。最后，我要感謝我的同學和朋友，在系統(tǒng)設計過程中，對于我所遇到的問題有過失落的時候，是我的同學和朋友在一直鼓勵我，為我提供了很多資料方面的幫助。在本次畢業(yè)設計過程中，在老師的耐心指導及同學們幫助下，基本上完成了預定目標。本次設計的數(shù)據(jù)庫應用系統(tǒng)，可能在實際應用中有些功能不到位。測試該模塊要達到的預期結果是實現(xiàn)對用戶登錄系統(tǒng)的密碼進行修改、用戶的信息是能正確的添加到數(shù)據(jù)表中、可以正常的對系統(tǒng)的數(shù)據(jù)進行備份和還原，測試的結果是在向用戶管理窗口中添加這樣一組數(shù)據(jù)“趙剛，123，Zhao gang，操作員”時不能將所添加的新記錄顯示給用戶，通過添加一個DBGrid組件可以實現(xiàn)功能，添加完新記錄后將用戶管理信息表中的記錄通過DBGrid網(wǎng)格顯示給用戶，達到預期的效果。在查詢信息界面的中介編號編輯框中輸入“001”后，單擊“開始查詢”按鈕，雖然可以將編號為“001”的記錄顯示給用戶，但是查詢的效率不高，通過將查詢條件修改為按照客戶是出租方或出售方來進行查詢則每次可以將多條記錄一起查詢出來，基本實現(xiàn)了預期的功能，提高了查詢的效率。測試該模塊時主要是看能否正確的錄入和查詢房源信息，預期的結果是可以實現(xiàn)對房源信息的添加、修改和刪除操作，按照查詢的條件將查詢到的房源記錄顯示給用戶；但測試的結果不是理想，只是實現(xiàn)了部分功能。測試任何產品都有兩種方法，一個是黑盒測試，一個是白盒測試。數(shù)據(jù)還原成功39。39。use master restore database house from disk=39。設計時首先定義一個字符串STR，通過ADOConnection組件和數(shù)據(jù)庫進行連接，然后添加還原數(shù)據(jù)的SQL語句，執(zhí)行SQL語句即可實現(xiàn)數(shù)據(jù)庫還原的功能，主要代碼如下。39。39。c: \39。刪除成功39。39。select * from login where num=39。您真的要刪除此記錄嗎？39。).AsString:=；；showmessage(39。).AsString:=；(39。)；；；(39。該用戶編號已經(jīng)存在,請核實39。以便和用戶管理表進行連接。使用的Combobox組件匯集了列表框和編輯框的功能，在該窗體中可以對用戶的權限進行選擇。如果要刪除某條記錄，輸入用戶編號，單擊“定位”按鈕將要刪除的記錄顯示出來，單擊“刪除”按鈕即可將該記錄刪除。)；（2）用戶管理① 功能說明該窗體模塊主要是對該系統(tǒng)中管理的用戶的名稱、密碼、編號及權限進行管理的操作，向窗體中的用戶名稱、初始密碼、用戶編號和用戶權限文本框中輸入數(shù)據(jù)，單擊“添加保存”按鈕對輸入的數(shù)據(jù)進行保存。；(39。當用戶更改自己的登錄密碼時，輸入新的密碼后，需要對所輸入的密碼重新輸入一遍進行確認，若兩次所輸入的密碼不一致，下面的語句給出兩次密碼不一致的信息提示。Label組件用于用戶提示操作，將其Caption屬性設置成輸入當前用戶編號、輸入當前用戶密碼、請輸入新密碼和確認新密碼。如果對該窗體沒有其它的操作通過單擊“退出”按鈕退出該窗體。Button組件在該窗體中使用了很多，實現(xiàn)對窗體中的數(shù)字按鈕的添加。使用Menu組件在窗體上方添加編輯（E）、查看（V）和幫助（H）三個菜單，編輯菜單包含復制（C）和粘貼（P）兩個下拉菜單。計算器可以執(zhí)行基本的運算，如加法和減法，以及科學計算器中的函數(shù)，如對數(shù)和階乘。圖510租賃合同管理窗口② 設計思路設計該窗體所用到的組件有：Scrollbox組件，Edit組件，Label組件，Panel組件，Button組件。if 0 thenbegin showmessage(39。；；(39。圖59買賣合同管理窗口② 設計思路設計該窗體所用到的組件有：Scrollbox組件，Edit組件，Label組件，Panel組件，Button組件。39。39。Button按鈕組件在該窗體中使用了兩個，分別是開始查詢和退出。39。select * from keyuan where leixing=39。圖58客源信息