【正文】 感謝各位參考文獻的作者們，站在巨人的肩膀上看得才更遠 ,這與你們的貢獻是離不開的。還要感謝我們 05軟件班的全體同學(xué)的幫助和關(guān)心，正是和你們的朝夕相處才有了今天的我，希望大家都能快樂幸福的永遠走下去。 畢業(yè)論文，總是在畢業(yè)時要寫的，正是要離別了，所以我要感謝我可愛的大學(xué) 濟 24 南職業(yè)學(xué)院，是你給我這個機會，讓我學(xué)到到了這么多我熱愛的專業(yè)知識，讓我有如此精彩的大學(xué)生 活，讓我認識了這么多可愛的同學(xué)們 ，感謝學(xué)院的各級領(lǐng)導(dǎo)們，正是你們的辛勤的奉獻，才有我們的如此和諧的學(xué)習(xí)和生活的 環(huán)境 。 最后我還要感謝的是帶領(lǐng)我 們班 完成三年大學(xué)生活的輔導(dǎo)員李娟老師，李老師真的是一名 責(zé)任心很強的輔導(dǎo)員，這三年來為同學(xué) 付 出了多少淚多少汗，又有誰知道呢？可是她還是一如既往地為同學(xué)默默付出，從不求回報，就這樣還有人挑老師毛病，在這里我要替那 些不知您良苦用心的同學(xué)說聲“對不起”。 還有就是要感謝賽煜老師，賽老師是曾經(jīng)教過我們 C語言和軟件工程的。就這樣我還經(jīng)常打擾老師的 休息時間，請教老師低級問題，可老師總是耐心教我，真是讓我受益匪淺，所以在這我要再次感謝丁老師，也希望您繼續(xù)努力培養(yǎng)出更優(yōu)秀的學(xué)生來。我能夠完成這篇論文，光靠我自己的力量是遠遠不夠的，應(yīng)該說它是許多人共同完成的。在社區(qū)中加入更多的社區(qū)訂閱級別，例如：第一級，可以得到基本的工具和免費的新聞組合，第二級，可以得到電子書和視頻培訓(xùn)等等，第三級，可以得到單獨的訂閱者培訓(xùn)，第四級，可以為公司提供更多的許可以及更多的擴展組件和咨詢服務(wù)。例如 Context Editor 邦定到 Delphi，以及 Beyond Compare 等更多的組件邦定到 Delphi 中，但是還需要做的更多。 22 更好的連通性 像， Jbuilder， DelphiIDE 應(yīng)該能與本地和異地的 Jbuilder， Delphi IDE 有更好的連通性，無論我在什么地方都應(yīng)該可以方便的看到開發(fā)項目的源代碼。例如 WebBroker ，AJAXprecursor，這些都是目前最好的 Web 技術(shù)，你可以在 Ruby on Rails 和 之外有更多的選擇。D 應(yīng)該更好的觀察發(fā)生在周圍的一切，然后比以往更快的將適合的技術(shù)整合到 Delphi中。 展望 一個 Turbo Pascal 和 Delphi 的時代已經(jīng)過去了，但是一個偉大技術(shù)，一個偉大的社區(qū)，一個新 Delphi 公司將帶領(lǐng) Delphi 來到了新時代。 21 第六章：結(jié)論與展望 小結(jié) DELPHI 從誕生到現(xiàn)在的發(fā)展壯大，經(jīng)歷了相當(dāng)長的一段時間，從 DELPHI1， DELPHI2，一直到今天的 DELPHI7 已經(jīng)是越來越強大起來 ，通過人們的不斷對其了解，熟知和不斷的深入，我想 DELPHI 定會像其他先進的技術(shù)一樣矗立于軟件行業(yè)之巔 。 系統(tǒng)測試把已經(jīng)經(jīng)過確認的軟件納入實際運行環(huán)境中，與其它系統(tǒng)成份組合在一起進行測試。 集成測試把已測試過的模塊組裝起來，主要對與設(shè)計相關(guān)的軟件體系結(jié)構(gòu)的構(gòu)造進行測試。 20 第五章 借貸 管理系統(tǒng)測試及運行 系統(tǒng)測試 測試過程按 4 個步驟進行，即單元測試、集成測試、確認測試和系統(tǒng)測試及發(fā)版測試 。 。39。 。 :=16。 := +39。 。39。 (39。bh39。 。 begin 。 end。 19 。 end。 。 。 。)。 showmessage(39。 。39。 (39。dkrbh39。 。 begin 。 刪除過程代碼： procedure (Sender: TObject)。 。 。 18 。 。 。39。)。 showmessage(39。 。update creditor set creditor_id=:dkrbh,creditor_name=:dkrxm,birthday=:csrq,door=:hj,credit_money=:dke,credit_time=:dknx,credit_use=:dkyt,credit_way=:tjdkfa,dp_name=:dwmc where creditor_id=:dkrbh39。,ptinput).AsString:=dwmced。 (ftstring,39。tjdkfa39。,ptinput).AsString:=dkyted。 (ftstring,39。dknx39。,ptinput).AsString:=dkeedit.Text。 (ftstring,39。hj39。,ptinput).AsString:=csrqed。 (ftstring,39。dkrxm39。,ptinput).AsString:=d。 (ftstring,39。 。 修改過程代碼： procedure (Sender: TObject)。 。 。 :=。 :=。 :=。 :=。 。39。 16 (39。dkrbh39。 。 begin 。 end。 end。 。 。 。 。 。 。)。 showmessage(39。 。39。 (39。dwmc39。,ptinput).AsString:=tjdk。 (ftstring,39。dkyt39。,ptinput).AsString:=dknxed。 (ftstring,39。dke39。,ptinput).AsString:=ext 。 (ftstring,39。csrq39。,ptinput).AsString:=dkrxm。 (ftstring,39。dkrbh39。 。 end else 14 begin 。 。 。 。 。 。)。 showmessage(39。 mycount:= 。 。39。 (39。dkrbh39。 。 。 。)。 showmessage(39。 var mycount:integer。 借貸 管理系統(tǒng)數(shù)據(jù) 庫 設(shè)計 這里包括十九個數(shù)據(jù)表如下： 貸款人基本 信息 （ creditor） ： 貸款人編號 creditor_id，姓名 creditor_name，出生日期 birthday，戶籍 door，貸 7 款額 credit_money，貸款年限 credit_time，貸款用途 credit_use，推薦貸款方案credit_way，單位名稱 dp_name 聯(lián)系人基本 信息 （ linkman） ： 聯(lián)系人編號 lman_id，姓名 lman_name，貸款人編號 creditor_id 聯(lián)系人電話記錄信息 (phonerecord)： 聯(lián)系電話 phone，來電時間 ph_time，聯(lián)系人編號 lman_id 貸款人單位信息 (department)： 單位名稱 dp_name，經(jīng)營行業(yè) working，公司性質(zhì) dp_kind 單位商鋪信息 (store)： 商鋪名稱 store_name，商鋪地點 store_place，攤位號 stall，商鋪性質(zhì) store_kind，租賃期限 leasehold，單位名稱 dp_name 抵押土地信息 (morfield)： 位置 mf_position，土地性質(zhì) mf_kind，產(chǎn)權(quán)性質(zhì) mfright_kind，抵押人年齡 morer_age，抵借關(guān)系 dijie，貸款人編號 creditor_id 聯(lián)系信息 (connection)： 聯(lián)系編號 link_id，接線員編號 operator_id，值班員編號 duty_id，派 單員編號sender_id，客戶經(jīng)理編號 clientm_id，客源 root 回訪記錄 (revertrecord)： 回訪編號 rt_id，回訪員編號 revertor_id，回訪時間 rt_time，貸款人編號 creditor_id 回訪信息 (revert)： 貸款人編號 creditor_id，回訪編號 rt_id，回訪內(nèi)容 rt_content 交費 信息 (charge)： 交費編號 charge_id，交費日期 charge_date，交費額度 charge_money，貸款人編號creditor_id 評估公司 信息 (evaluater)： 評估公司名稱 evaluate_name，評估公司電話 evaluate_phone，評估公司地址evaluate_address,貸款人編號 creditor_id 評估 信息 (evaluating)： 貸款人編號 creditor_id，評估公司名稱 evaluate_name，評估值 opinion，評估日期evaluate_date，報件日期 filedate，審批單元 exam，送件員編號 filesender_id 8 補充材料 信息 (addfile)： 補充材料編號 addfile_id，補充材料內(nèi)容 addfile_content，補充材料日期addfiledate，上級審批時間 examdate，貸款人編號 creditor_id 考察 信息 (examination)： 考察編號 exam_id，考察時間 examtime，陪同考察員 peitongexamer，貸款人編號creditor_id 抵押住房 信息 (morhouse)： 抵押房產(chǎn)地址 address，房產(chǎn)價值 mh_valuate，房產(chǎn)權(quán)性質(zhì) mh_rightkind，抵押比率morrate，房產(chǎn)面積 mh_area，房齡 mh_age，房產(chǎn)用途 mh_use，貸款人編號 creditor_id 銀