房產(chǎn)中介管理軟件客戶管理窗體的設(shè)計(jì)與實(shí)現(xiàn)

申請免費(fèi)試用、咨詢電話：400-8352-114

　　房產(chǎn)中介管理軟件客戶管理窗體的設(shè)計(jì)與實(shí)現(xiàn)

　　(1)客源信息錄入

　　① 泛普軟件功能說明

　　該窗體模塊是提供對求租和求購房屋及房屋擁有者的所有用戶的基本信息進(jìn)行錄入及信息維護(hù)的窗體。當(dāng)向窗體的姓名、編號、聯(lián)系電話、類型和E-mail文本框中輸入數(shù)據(jù)后，單擊“添加保存”按鈕保存新添加的客戶信息，在窗體的客源信息列表中顯示出新添加的記錄。單擊“保存”按鈕可以重新向窗體的各文本框中輸入客戶的數(shù)據(jù)。當(dāng)向編號文本框中輸入客源信息表中已經(jīng)存在的客戶信息，通過單擊“定位”按鈕可以在客源信息列表中顯示出定位的客戶信息。當(dāng)對客源信息數(shù)據(jù)表中的某條記錄修改完成后，單擊“修改保存”按鈕對修改后的客戶基本信息進(jìn)行保存。如果要刪除某條客戶信息，先輸入客戶編號進(jìn)行定位，然后單擊“刪除”按鈕將該信息刪除。如果對該窗體沒有其它的操作通過單擊“退出”按鈕退出該窗體。

　　② 房產(chǎn)中介管理系統(tǒng)設(shè)計(jì)思路

　　設(shè)計(jì)該窗體所用到的組件有：GroupBox組件，ComboBox組件，Button組件，Edit組件，Label組件，DBGrid組件，Panel組件，DataSource1組件。

　　該窗體的設(shè)計(jì)使用GroupBox組件將窗體分成客源基本信息錄入和客源信息列表兩部分，客源基本信息錄入部分的Label組件用于用戶操作提示。Edit組件用來接收向窗體中輸入的數(shù)據(jù)。ComboBox組件匯集了列表框和編輯框的功能，用戶可以從下拉列表中選擇數(shù)據(jù)或者直接向組合框中輸入數(shù)據(jù)?？驮葱畔⒘斜聿糠值腄ataSource1數(shù)據(jù)庫連接組件的Dataset屬性設(shè)置成dm.a，通過下面的語句可以實(shí)現(xiàn)打開客源信息表，將客源信息表中的所有記錄顯示出來。

　　dm.a.Close;

　　dm.a.SQL.Clear;

　　dm.a.SQL.Add('select * from keyuan');

　　dm.a.Open;

　　將DBGrid組件的DataSource屬性設(shè)置成DataSource1;Visible屬性是邏輯型，取值為True，決定該組件是可見的。向客源信息表中添加記錄時(shí)先將編號和信

　　息表中的編號進(jìn)行比較，若所輸入的編號已經(jīng)存在，下面的語句給出信息提示。

　　if dm.d.RecordCount>0 then

　　begin

　　showmessage('此編號已經(jīng)存在，請輸入其他的編號');

　　exit;

　　end;

　　若編號不存在則將記錄添加到信息表中，并將添加完新記錄的客源基本信息通過DBGrid顯示在網(wǎng)格中，方便用戶的查看。

　　Panel組件也叫面板，可在其上放置其他組件，常用于組織程序界面。Button按鈕組件，在該窗體中使用了六個(gè)分別是添加、添加保存、定位、修改保存、刪除和退出。

　　(2)房管家erp中介管理軟件客源信息查詢

　　① 功能說明

　　房產(chǎn)中介管理軟件的窗體模塊提供對求租和求購房屋及房屋擁有者的所有用戶的基本信息通過根據(jù)名稱查詢或根據(jù)編號查詢兩個(gè)查詢條件進(jìn)行查詢的管理，根據(jù)名稱查詢時(shí)，向文本框中輸入名稱，單擊“開始查詢”按鈕進(jìn)行查詢。根據(jù)編號查詢時(shí)，向文本框中輸入編號，單擊“開始查詢”按鈕進(jìn)行查詢。通過DBGrid組件可以將要查詢的客戶的基本信息顯示出來。如果對該窗體沒有其它的操作通過單擊“退出”按鈕退出該窗體。

　?、?房產(chǎn)中介管理系統(tǒng)設(shè)計(jì)思路

　　設(shè)計(jì)該窗體所用到的組件有： GroupBox組件, CheckRadioBox組件，DBGrid組件，Button組件，Edit組件，Label組件, DataSource1組件。

　　該窗體的設(shè)計(jì)使用GroupBox組件將窗體中所使用到的其他組件都放到其中，CheckRadioBox組件稱為復(fù)選框，用戶可以對它做出選擇。若選擇按出售方進(jìn)行查詢，通過下面的語句可以實(shí)現(xiàn)按所選擇的查詢方式進(jìn)行查詢的功能。

　　if bsskincheckradiobox3.Checked then

　　begin

　　dm.q.Close;

　　dm.q.SQL.Clear;

　　dm.q.SQL.Add('select * from keyuan where leixing='''+ bskin

　　checkradiobox3.Caption+'''');

　　dm.q.Open;

　　end;

　　Edit組件接收用戶向窗體中輸入的數(shù)據(jù)。Button按鈕組件在該窗體中使用了兩個(gè)，分別是開始查詢和退出。DataSource1組件的Dataset屬性值設(shè)置為dm.q，通過下面的四條語句可以實(shí)現(xiàn)根據(jù)所輸入的名稱從數(shù)據(jù)表中查詢出匹配的記錄，并通過DBGrid組件將客源信息表中匹配的數(shù)據(jù)顯示在網(wǎng)格中。

　　dm.q.Close;

　　dm.q.SQL.Clear;

　　dm.q.SQL.Add('select * from keyuan where name ='''+ bsskin edit1.Text+'''');

　　dm.q.Open;