【正文】 稱為dm的數(shù)據(jù)模塊(DataModule)中添加幾個(gè)數(shù)據(jù)訪問控件。訪問f_build表訪問f_house表的數(shù)據(jù)控件圖57 新添訪問f_house和f_build表的數(shù)據(jù)控件 樓盤樓房資料錄入模塊的界面設(shè)計(jì)1. 設(shè)計(jì)步驟（1）在系統(tǒng)中新建一個(gè)窗體，窗體名為houseform，單元文件名為houseunit，Caption屬性為“樓盤樓房資料錄入”，BorderStyle屬性設(shè)為bsSingle；（2）設(shè)計(jì)好的界面如圖58所示。（3）樓房資料錄入模塊還要訪問數(shù)據(jù)表f_build注意：因?yàn)闃欠抠Y料錄入模塊是由樓盤資料錄入模塊中進(jìn)入的，所以樓盤資料錄入模塊必須關(guān)聯(lián)樓房資料錄入模塊，也就是說，在樓盤資料錄入模塊中要Use?！馎DOTable 表控件，取名為，housetable；●它的Connection屬性仍然設(shè)置為fdc_conn；●TableName屬性為f_build；●加入一個(gè)DataSource（數(shù)據(jù)源控件）控件，命名為dshouse，它的Dataset 屬性指定為housetable（注意不要指定錯(cuò)了）。圖55 樓盤樓房資料錄入模塊運(yùn)行結(jié)果在該窗口中單擊按鈕會(huì)彈出“樓房資料”模塊窗口，見圖56。提示信息39。,mb_iconstop)。確定要?jiǎng)h除這條數(shù)據(jù)嗎？39。],[])=true then begin messagebox(,39。,mb_iconinformation)。 if .Locate(39。 :=false。 :=false。 :=false。添加和編輯按鈕變?yōu)榛疑珗D55 開始錄入房型資料錄入完后點(diǎn)擊保存按鈕，保存剛才錄入的資料。 //取消按鈕是可見的添加和編輯按鈕變?yōu)榛疑? :=false。 。房型編號39。 newid:int64。 if key=38 then 。 if key=114 then //F3 if =true then 。procedure (Sender: TObject)。 Shift: TShiftState)。（5）在窗體的中央添加一個(gè)TDBGrid組件，占滿差ungtide整個(gè)中央部分。設(shè)置CommandText屬性的步驟是：點(diǎn)擊該屬性后面的…，彈出CommandText 編輯框，按照圖41左邊選擇f_mode表，右邊框中列出要從該表中選擇的字段名。第5章 功能模塊設(shè)計(jì) 房型資料錄入模塊設(shè)計(jì)房型資料錄入模塊提供對房屋類型的管理，該模塊主要對f_mode表進(jìn)行基本的增加、編輯、刪除和修改等操作。procedure (Sender: TObject)。end。 :=false。用戶管理39。]。 :=[39。收款管理39。]。 :=[39。提示信息39。用戶名稱或用戶密碼不正確，請重新輸入39。 :=true。 :=true。 [1].Text:=39。procedure (Sender: TObject。begin :=clskyblue。 var Key: Word。如果一致，程序就打開主窗體，供登錄者進(jìn)行所需的操作；否則會(huì)彈出提示框，要你輸入正確的用戶名和密碼，而且最多只能連續(xù)輸入三次，若三次都不成功，那么程序就退出。為了防止無關(guān)人員在數(shù)據(jù)庫中獲取用戶信息，而對應(yīng)用程序進(jìn)行操作，可以先對用戶名和密碼進(jìn)行再加密后存入數(shù)據(jù)庫中，這樣用戶名和密碼就不太容易被盜取，使應(yīng)用程序變得更加安全。 點(diǎn)擊 后面的…，彈出下面的編輯窗體：選擇左邊的f_user表后，在這里書寫select *from f_user 代碼2) usertable 控件，這是ADO頁的表控件，取名為：usertableUsertable的屬性設(shè)置： 要連接到fdc_conn控件 要指定它要訪問的數(shù)據(jù)表：f_user表。Caption：dm。由于內(nèi)容較多，代碼就不一一列出，具體的代碼請參見程序設(shè)計(jì)部分。1）procedure FormShow(Sender: TObject)。begin :=1。選擇SpeedButton1，通過它的Glyph 屬性添加上為它準(zhǔn)備好的圖標(biāo)，并從它的Caption 屬性中輸入中文名。+datetimetostr(now)。這些功能的實(shí)現(xiàn)是靠代碼完成的，稍后介紹這些代碼。設(shè)計(jì)好的二級菜單如圖34所示。狀態(tài)條工具條主菜單 主窗體頁面 主窗體界面詳細(xì)設(shè)計(jì)1. 啟動(dòng)Delphi 開發(fā)平臺(tái)，將自動(dòng)彈出的窗體設(shè)為主窗體，并命名。 房屋信息表的字段樓房信息表f_house的字段如表4所示。樓房224。所以在設(shè)計(jì)之前，要把模塊之間的關(guān)系梳理清除。Delphi + SQL Server2000房地產(chǎn)信息管理系統(tǒng)的設(shè)計(jì)與開發(fā)（講義） 計(jì)算分院短學(xué)期教材（2）房地產(chǎn)信息管理系統(tǒng)的設(shè)計(jì)與開發(fā)【摘要】該系統(tǒng)為滿足中小房屋銷售公司業(yè)務(wù)管理的需要，按照一般的房產(chǎn)銷售管理業(yè)務(wù)流程，通過模塊化設(shè)計(jì),能夠?qū)潜P、樓房、房屋、客戶信息，房屋銷售情況及員工業(yè)績等多種信息進(jìn)行全方位管理。 目錄Delphi + SQL Server2000 1第1章 概要 1： 1 基礎(chǔ)信息管理 1第2章 數(shù)據(jù)庫設(shè)計(jì) 3 3 4 樓房信息表的字段 5 房屋信息表的字段 5 5 系統(tǒng)流程圖 6第3章 主窗體設(shè)計(jì) 7 7 主窗體界面設(shè)計(jì)概要 7 主窗體界面詳細(xì)設(shè)計(jì) 8 主窗體的第一次代碼設(shè)計(jì) 15 數(shù)據(jù)模塊設(shè)計(jì) 16第4章 登錄模塊設(shè)計(jì) 21 登錄模塊的窗體設(shè)計(jì) 21 登錄窗口樣式 21 登錄模塊的數(shù)據(jù)控件 23 登錄模塊代碼設(shè)計(jì) 24第5章 功能模塊設(shè)計(jì) 30 房型資料錄入模塊設(shè)計(jì) 30 在dm窗體中添加數(shù)據(jù)控件 30 窗體詳細(xì)設(shè)計(jì) 31 房型資料錄入窗體的代碼設(shè)計(jì) 32 樓盤樓房資料錄入模塊的設(shè)計(jì) 39 做好連接數(shù)據(jù)表的準(zhǔn)備 40 樓盤樓房資料錄入模塊的界面設(shè)計(jì) 42 樓房資料錄入模塊的設(shè)計(jì) 44第6章 數(shù)據(jù)統(tǒng)計(jì)報(bào)表的設(shè)計(jì) 45 數(shù)據(jù)統(tǒng)計(jì)報(bào)表設(shè)計(jì)概述 45參考文獻(xiàn) 46附錄 47圖目錄 系統(tǒng)流程圖 6 主窗體頁面 7 一級菜單設(shè)計(jì)圖 8 【房屋銷售管理】的二級菜單設(shè)計(jì)圖 9 其余三項(xiàng)菜單的二級菜單設(shè)計(jì)圖 9 菜單的詳細(xì)內(nèi)容 10 設(shè)置image控件的”picture”屬性以載入背景圖 10 載入背景圖后的樣式 11 將StausBar1控件分成三段 12 狀態(tài)條第三段顯示系統(tǒng)時(shí)間 13 設(shè)計(jì)好的工具欄 14 設(shè)置快捷鍵的Layout屬性 14 選擇DataModule窗體 16 DataModule窗體中的連接控件 17 fdc_conn控件的Connection屬性 17 數(shù)據(jù)庫連接成功 18 設(shè)置DBLookupCombobox1控件的屬性 22圖43 為登錄窗體訪問數(shù)據(jù)庫要求的數(shù)據(jù)控件 23圖44 登錄用的用戶表 24圖45 登錄窗口 29圖46 預(yù)先竄放在f_user表的信息 29 編輯CommandText屬性 30 編輯CommandText屬性 31圖53 設(shè)計(jì)好的房型資料錄入窗體 32圖54 房型資料錄入窗體初始化時(shí)的三個(gè)事件 33三個(gè)事件的詳細(xì)代碼： 33圖54 編譯好的房型資料錄入窗體 35圖55 開始錄入房型資料 36圖55 樓盤樓房資料錄入模塊運(yùn)行結(jié)果 39圖55 樓房資料錄入模塊運(yùn)行結(jié)果 40圖56 CommandText Editor窗口 41圖57 新添訪問f_house和f_build表的數(shù)據(jù)控件 42圖58 樓盤樓房資料錄入界面 43表目錄表1 3表2 樓盤基本信息表f_build 的字段 4表5 客戶信息表f_customer 的字段 5第1章 概要： 房地產(chǎn)信息管理系統(tǒng)的功能很多，系統(tǒng)大而復(fù)雜，設(shè)計(jì)起來非常繁瑣，尤其是銷售部分，相互關(guān)聯(lián)的部分很多，窗口套窗口。第2章 數(shù)據(jù)庫設(shè)計(jì)用SQL Server2000創(chuàng)建數(shù)據(jù)庫，.數(shù)據(jù)庫一共有30張表，表名見表1：表1 表名稱 功能描述f_appertain_house附屬房產(chǎn)f_build樓盤基本信息f_buy_factor客戶購買因素信息表f_buy_will客戶購買意向f_customer客戶信息f_customer_change客戶更換信息f_customwer_return退房信息表f_customer_work客戶工作信息f_employees員工信息表f_family_s