房地產(chǎn)信息管理系統(tǒng)的設(shè)計(jì)與開(kāi)發(fā)-全文預(yù)覽
【正文】 我們首先要在名稱為dm的數(shù)據(jù)模塊(DataModule)中添加幾個(gè)數(shù)據(jù)訪問(wèn)控件。在該窗體中選擇選擇一個(gè)樓盤(pán)，單擊窗體下方的樓房按鈕，即可彈出“樓房資料”窗口，該樓房資料從屬于前面選擇的樓盤(pán)。 exit。請(qǐng)確定是保存或是取消，才能退出窗口39。 if =0 then :=false。,39。房屋資料刪除39。 end。,39。,[39。 end。,39。,[39。3. 刪除代碼如下：procedure (Sender: TObject)。 :=false。 :=true。 :=false。 :=false。 :=false。 :=false。//房屋窗體中點(diǎn)擊編輯按鈕的代碼begin if =0 then begin exit。end。 :=false。 //光標(biāo)停在房型名稱輸入控件處 :=true。房型編號(hào)39。房型編號(hào)39。000139。 if =0 then begin 。begin for i:=0 to 1 do if [i] is tdbedit then tdbedit( [i]).ReadOnly :=false。 //點(diǎn)擊增加按鈕 var //先設(shè)立三個(gè)局部變量 y,m,d:word。 end。 if key=120 then //F9 if =true then 。 if key=116 then //F5 if =true then 。 Shift: TShiftState)。 。 //保存按鈕 :=false。具體說(shuō)，按下功能鍵F4，也就是按下了窗體中的。3. procedure FormKeyDown(Sender: TObject。設(shè)計(jì)好的方形資料錄入模塊如圖53所示。通過(guò)該組件中的箭頭控制DBGrid表中數(shù)據(jù)記錄的位置。（見(jiàn)圖51），并設(shè)置每個(gè)組件的DataField屬性為相應(yīng)的連接字段。dmode控件（DataSource）只需要設(shè)置它的DataSet屬性為mode，即DataSource的字符集是通過(guò)表控件“mode”獲得。 在dm窗體中添加數(shù)據(jù)控件為了能夠訪問(wèn)f_mode表，需要在md窗體（DataModule1）中加入相關(guān)的數(shù)據(jù)訪問(wèn)控件，并進(jìn)行相應(yīng)的屬性設(shè)置。圖46 預(yù)先竄放在f_user表的信息到此，我們就完成了第一階段的設(shè)計(jì)。end。begin 。 var Action: TCloseAction)。begin 。 end。用戶名稱39。 :=[39。]?？蛻糍?gòu)訂收款統(tǒng)計(jì)39。 :=[39。]。收款安排查詢39。 :=[39。]。公司資料錄入39。 :=[39。]。操作員: 39。 。您已經(jīng)三次輸入不正確，請(qǐng)退出39。提示信息39。]) then begin times:=times+1。 :=false。 :=true。主窗體中的那些菜單因?yàn)榈卿浀氖恰俺?jí)用戶”所有的菜單都是可操作的 :=true。 :=true。+。 //按下鍵begin if =0 then begin :=39。 Shift: TShiftState)。begin :=clskyblue。procedure (Sender: TObject)。end。 //當(dāng)點(diǎn)擊用戶名輸入框時(shí)執(zhí)行的動(dòng)作begin if key=13 then //按下回車鍵 。implementationuses dmunit, mainunit。用戶名、密碼和用戶權(quán)限存儲(chǔ)在f_user表中，字段名有用戶編號(hào)、用戶名稱、和用戶密碼以及用戶權(quán)限等多項(xiàng)，參見(jiàn)圖44：代表用戶有權(quán)進(jìn)行房型錄入操作圖44 登錄用的用戶表 登錄模塊代碼設(shè)計(jì)登錄模塊的主要程序代碼如下：unit loginunit。用它可以從下拉列表框中選擇已經(jīng)保存在User數(shù)據(jù)表中的用戶，不必每次輸入用戶名。一個(gè)用戶最多允許輸入三次用戶名和密碼，超過(guò)三次，系統(tǒng)將退出。用戶登錄的作用是保護(hù)應(yīng)用程序中的相關(guān)資料，以防止無(wú)關(guān)人員對(duì)程序信息的肆意破壞。duser控件的屬性設(shè)置：指定它的DataSet5) duserdataset 這是一個(gè)DataSource控件（在DataAccess頁(yè)），取名為duserdataset，表示與前一個(gè)userdataset控件配套使用。要連接的數(shù)據(jù)庫(kù)名選擇服務(wù)器選擇提供程序 fdc_conn控件的Connection屬性 數(shù)據(jù)庫(kù)連接成功接下來(lái)在“dm”窗體中逐次添加以下數(shù)據(jù)控件：1) userdataSet 控件屬性設(shè)置：? Connection 198。設(shè)計(jì)好的數(shù)據(jù)模塊如圖313所示。點(diǎn)選Data Module 選擇DataModule窗體窗體名：dm。 name:string。 //退出系統(tǒng)菜單begin Close。3）procedure FormKeyDown(Sender: TObject。end。procedure (Sender: TObject。procedure (Sender: TObject。把該鍵的Layout屬性設(shè)置為blGlyphTop被選中的快捷鍵 設(shè)置快捷鍵的Layout屬性7) 主窗體工具欄的拖曳工具欄不一定始終?？吭谝粋€(gè)個(gè)固定的地方，而是隨時(shí)可以變換地方，這就要用到控件的拖曳技術(shù)。這些SpeedButton按鈕作為工具欄的快捷鍵；3. 給每個(gè)按鈕添加上相應(yīng)的圖標(biāo)和文字。編譯后就可以在狀態(tài)條的第三段看到系統(tǒng)時(shí)間，如圖39所示：工具欄顯示系統(tǒng)時(shí)間 狀態(tài)條第三段顯示系統(tǒng)時(shí)間6) 主窗體工具欄的設(shè)計(jì)在主窗體中添加一個(gè)工具欄，工具欄上放置若干個(gè)快件鍵，以提供某些快速操作。begin[2].Text :=39。然后在其“Width”屬性中設(shè)置每一段的寬度，如圖38 所示。第一個(gè)區(qū)域顯示公司名稱，第二個(gè)區(qū)域顯示當(dāng)前的操作員，第三個(gè)區(qū)域顯示系統(tǒng)時(shí)間。我們可以展開(kāi)Delphi 設(shè)計(jì)平臺(tái)左上角的“object treeview”視窗查看主窗體“MainForm”的全部菜單內(nèi)容，如圖35所示。這條線（分隔符）是在Caption屬性中輸入英文狀態(tài)下的“”號(hào)二級(jí)菜單一級(jí)菜單 一級(jí)菜單設(shè)計(jì)圖2）設(shè)計(jì)二級(jí)菜單在Menu Designer 中的標(biāo)識(shí)完成【房屋銷售管理】菜單的二級(jí)菜單的設(shè)計(jì)。1）主菜單設(shè)計(jì)向主窗體中拖放一個(gè)主菜單控件，使用它的默認(rèn)名：Mainmenu1。另外，在主菜單的最下方有一個(gè)狀態(tài)欄，該欄用于顯示系統(tǒng)的當(dāng)前狀態(tài)，例如當(dāng)前的操作員和系統(tǒng)時(shí)間等?？蛻粜畔⒈硪彩潜鞠到y(tǒng)的重要數(shù)據(jù)表。每棟樓房有多個(gè)戶數(shù)，該表記錄每戶的信息。1. f_build 樓盤(pán)基本信息。此外還有公司員工信息、客戶信息等。 圖11 房地產(chǎn)信息管理系統(tǒng)功能結(jié)構(gòu)圖 基礎(chǔ)信息管理房屋銷售管理系統(tǒng)的基礎(chǔ)信息中，關(guān)于樓房的信息有樓盤(pán)（即我們平時(shí)所說(shuō)的小區(qū)）、樓房（即該小區(qū)中的第幾號(hào)樓）、和房屋（即戶）三層基礎(chǔ)資料。該系統(tǒng)還具有操作界面友好、使用方便、維護(hù)簡(jiǎn)單等顯著特點(diǎn)，是中小房產(chǎn)企業(yè)管理銷售業(yè)務(wù)的有力工具。每個(gè)大的模塊又由多個(gè)分模塊組成，比如，房屋銷售模塊中又包括房屋銷售管理、客戶資料管理、銷售收款管理和客戶退款管理等,能夠滿足房屋銷售業(yè)務(wù)各個(gè)環(huán)節(jié)的需要。系統(tǒng)由基礎(chǔ)信息、房屋銷售、統(tǒng)計(jì)報(bào)表和系統(tǒng)設(shè)置等四大模塊組成。系統(tǒng)使用Delphi Server數(shù)據(jù)庫(kù)為開(kāi)發(fā)平臺(tái),系統(tǒng)具有很好的安全性。系統(tǒng)由基礎(chǔ)信息、房屋銷售、統(tǒng)計(jì)報(bào)表和系統(tǒng)設(shè)置四個(gè)大的功能模塊組成。關(guān)于樓房的第三項(xiàng)基本數(shù)據(jù)是具體到每一戶，就是數(shù)據(jù)庫(kù)中的f_room（房屋信息表），動(dòng)手設(shè)計(jì)之前，一定要牢記這三張表。房屋。3. f_room 房屋基本信息。表5列出的是客戶信息表的字段。工具條上放了許多使用頻率高的快捷鍵，以提高使用者的操作速度。主窗體的name屬性：mainform；主窗體的單元文件名：；工程文件名：。具體內(nèi)容如圖31所示。 其余三項(xiàng)菜單的二級(jí)菜單設(shè)計(jì)圖至于【幫助】菜單的二級(jí)菜單只有“關(guān)于”和“幫助 F2” 這2項(xiàng)。將StausBar1分成三個(gè)區(qū)域，分別是StatusPanelStatusPanel2和StatusPanel3。將狀態(tài)條分段的操作方法是：在StausBar1 控件上按鼠標(biāo)右鍵，彈出“Editing ” 編輯窗，在該編輯窗上面按右鍵，選擇彈出窗的“Add”，將StatusBar1分成三段，分別是0STatusPanel1
黨政相關(guān)相關(guān)推薦
鄂ICP備17016276號(hào)-1