【正文】 的需求分析，結合數(shù)據(jù)庫概念結構設計和邏輯結構設計，得出數(shù)據(jù)庫的表結構設計如下面表 到表 所示。PowerBuilder 與數(shù)據(jù)庫的連接建立在驅動程序之上。接口的參數(shù)可以通過一個 Database Profile 來完成。在此 Database 基于 Delphi 的財務管理系統(tǒng)的設計與開發(fā)21Profile 中所記錄的是建立到數(shù)據(jù)庫的一些連接信息，如數(shù)據(jù)庫管理信息(DBMS)的類型、用戶賬號、口令、數(shù)據(jù)庫以及其他的連接參數(shù)。、PowerBuilder 中設計數(shù)據(jù)窗口的時候，通過“Database Profile”對話框實現(xiàn)與數(shù)據(jù)庫的連接。2 程序設計時與數(shù)據(jù)庫連接在程序設計中可以使用“Database Profile”對話框完成配置和連接。如果沒有定義數(shù)據(jù)庫配置，需要創(chuàng)建新的數(shù)據(jù)庫配置。在其中選擇要配置的數(shù)據(jù)庫使用的數(shù)據(jù)庫接口，“ODB ODBC”節(jié)點。完成設置后，單擊“Preview”標簽頁，在該標簽頁中列出了數(shù)據(jù)庫剛剛配置的語句。這時 “ODB ODBC”節(jié)點下面就多了剛剛配置好的 Database Profile。當 通過 Database Profile 連接到數(shù)據(jù)庫上之后，在程序上之后，在程序設計的創(chuàng)建數(shù)據(jù)窗口對象時，可以直接顯示該用戶在數(shù)據(jù)庫中可以修改的表，通過選擇某個(或者多個) 表可以將它們和數(shù)據(jù)窗口對象連接起來。在應用程序對象中實現(xiàn)與數(shù)據(jù)庫連接，不在通過“Database Profile”對話框，而是使用 Transaction事物對象。開發(fā)的應用程序的入口點是 的應用程序對象?；?Delphi 的財務管理系統(tǒng)的設計與開發(fā)22在“Database Profile”對話框完成設置后，單擊“Preview”標簽頁，在該標簽頁中列出了配置的語句?；?Delphi 的財務管理系統(tǒng)的設計與開發(fā)23第四章 關鍵模塊及代碼設計 應用程序對象設計 開發(fā)的應用程序的入口點是 的應用程序對象，運行是程序從這個入口點啟動，所以應用程序對象的設計是應用程序設計的開始。本應用程序對象中只用到 Open 事件，輸入如下程序代碼：// Profile Caiwu = ODBC = False = Connectstring=39。connect。用戶必須通過系統(tǒng)登陸窗口才能夠進入主界面。圖 登陸界面圖 主界面設計本應用程序的主要功能都是在主窗口 w_main 及在其下打開的眾多窗口中完成的。將主窗口的 WindowType 屬性設立為 mdi 型，以便在基于 Delphi 的財務管理系統(tǒng)的設計與開發(fā)24其下以特定方式打開其他窗口。重新登陸可以在主界面中直接修改登陸的用戶，其代碼與登陸窗口大致相同，同樣要確認用戶編碼和密碼；用戶修改密碼時，要提供原密碼以確認操作是否合法；創(chuàng)建新用戶由用戶姓名、用戶編碼、用戶密碼，職位和聯(lián)系電話組成。分別對會計科目、會計期間和兌換率的各信息進行維護。以方便在憑證錄入時的操作。通過數(shù)據(jù)窗口，可以對數(shù)據(jù)庫進行操作，不但可以對每個數(shù)據(jù)庫的表進行檢索、查詢、插入、刪除和更新，而且還可以為數(shù)據(jù)指定輸入格式、輸出格式和顯示風格等。本系統(tǒng)中還會用到 Grid 風格、Group 風格的數(shù)據(jù)窗口，將在后面的內容中具體介紹。1．當信息管理者需要插入一條新的員工記錄時，只要通過鼠標選擇“增加”按鈕，其程序代碼如下： (0)()(1)(())2． “刪除”按鈕的主要功能是用于刪除當前顯示的那條記錄，其程序代碼如下：int s //用于存放消息框返回值int i //用于存放 update()函數(shù)返回值s=messagebox(,真的要刪除嗎？,question!,yesnocancel!,2) //提醒用戶是否真的要刪除if s=1 then (0) //刪除當前行 i=() //更新數(shù)據(jù)表 if i=1 then //根據(jù)更新記錄數(shù)判斷是否執(zhí)行成功 mit using sqlca。 messagebox(提示,您刪除不成功！) end ifend if3． “保存”按鈕用于提交和確認對該數(shù)據(jù)庫表格中的記錄所做的修改，包括插入和刪除，如果提交失敗，則取消修改。 messagebox(,保存成功) =string(())基于 Delphi 的財務管理系統(tǒng)的設計與開發(fā)28else messagebox(錯誤信息,操作不成功) rollback using sqlca。? “第一頁” ”的程序代碼如下：(1) //將數(shù)據(jù)窗口滾動到第一行=1 ? “上一頁” ”的程序代碼如下：integer row_current row_current=() =string(row_current)if row_current=1 thenmessagebox(警告, 已經(jīng)是最前一條記錄)=1end if? “下一頁”的程序代碼如下：integer row_countinteger row_currentrow_current=()=string(row_current)row_count=()if row_current=row_count then=string(())messagebox(警告, 已經(jīng)是最后一條記錄)end if ? “最后一頁”的程序代碼如下：int ii=()(i)=string(i)基于 Delphi 的財務管理系統(tǒng)的設計與開發(fā)29上述就是科目設置信息輸入窗口的主要設計過程以及主要的程序代碼，對于系統(tǒng)下述模塊中，有用到“第一頁” “上一頁” “下一頁” “最后一頁”的控件，其設計也是采用類似的方法。 會計期間設置界面設置該窗口，主要功能對會計期間信息進行錄入、維護。會計期間設置界面圖、代碼都類似與兌換率設置界面。以方便在貨幣進行轉換時的操作。 應收管理子系統(tǒng)界面設計應收管理子系統(tǒng)的設計，主要根據(jù)銷售部門提供的發(fā)票單據(jù)，進行財務管理上應收結帳單和收款單的錄入，同時設計了對這兩種單據(jù)的查找界面，而且能根據(jù)所需信息，生成對應報表。 應收結帳單查找界面設置該窗口主要功能是對應收結帳單從多人口進行查找。界面在查找的符號上設計了“ ”、 “”、 “=”、和“l(fā)ike” ，更方便用戶。 本界面按鈕的代碼大部分同科目界面，其中“查找”鍵的代碼如下：string zd,nr,sql,fhint nzd=trim()fh=trim()nr=trim()if fhlike thenif zd=結帳單號碼 then(sqlca)(rinvoice_invno+fh+39。)//設置檢索條件()elseif zd=送貨單號碼 then(sqlca)基于 Delphi 的財務管理系統(tǒng)的設計與開發(fā)30 (rinvoice_delno+fh+39。) ()elseif zd=客戶代號 then (sqlca)(del_customerid+fh+39。)()elseif zd=貨號 then(sqlca) (del_huohao+fh+39。)()elseif zd=送貨地代號 then(sqlca)(del_shippingid+fh+39。)()end ifelseif zd=結帳單號碼 then(sqlca) (rinvoice_invno +fh+ 39。)()elseif zd=送貨單號碼 then(sqlca)(rinvoice_delno+fh+ 39。)()elseif zd=客戶代號 then(sqlca)(del_customerid +fh+ 39。)()elseif zd=貨號 then(sqlca)(del_huohao +fh+ 39。)()elseif zd=送貨地代號 then(sqlca)基于 Delphi 的財務管理系統(tǒng)的設計與開發(fā)31(del_shippingid +fh+ 39。)()end ifend ifn=() //獲取當前數(shù)據(jù)窗口記錄數(shù)=string(n) if n=0 thenmessagebox(查詢結果,沒有符合條件的記錄)end if 上述就是應收結帳單查詢界面設計信息窗口的主要設計過程以及主要的程序代碼，對于系統(tǒng)下述模塊中，有用到“查詢”的控件，其設計也是采用類似的方法。 應收結帳單報表界面設置上述就是應收結帳單查詢界面設計信息窗口的主要設計過程以及主要的程序代碼，對于系統(tǒng)下述模塊中，有用到“查詢”的控件，其設計也是采用類似的方法。本界面按鈕的代碼大部分同上科目界面，其中“生成”鍵的代碼如下：jz=trim()(sqlca)(jz) //jz 全局變量； 收款單管理界面設置該窗口主要功能是進行收款單的錄入。其界面的設計代碼同應收結帳單管理界面，詳細代碼見附錄。人口分別有“結帳單號碼”和“收款單號碼” 。其界面的設計代碼同應收結帳單管理界面，詳細代碼見附錄。 應付管理子系統(tǒng)界面設置應付管理子系統(tǒng)的設計，主要根據(jù)采購部門提供的發(fā)票單據(jù)，進行財務管理上應付結帳單和付款單的錄入，同時設計了對這兩種單據(jù)的查找界面，而且能根據(jù)所需信息，生成對應報表。 資金管理子系統(tǒng)界面設置資金管理子系統(tǒng)的設計，主要根據(jù)資金屬性的不同分為現(xiàn)金和銀行資金兩大塊，本子系統(tǒng)是讓出納員分別進行現(xiàn)金出納簿和銀行出納簿的錄入，同時根據(jù)錄入信息分別可以對現(xiàn)金出納簿和銀行出納簿的條目進行查詢，現(xiàn)金出納簿查詢人口有“日期”和“摘要” ，銀行出納簿查詢人口有“日期” 、 “銀行代號”和“摘要” ，從而方便使用。其界面設計和代碼設計同上述應收管理子系統(tǒng)，在此不作詳細講述，詳細代碼見附錄。其中根據(jù)日常的帳目往來，錄入憑證，日記帳界面是根據(jù)憑證日期的先后順序生成的報表，明細帳是根據(jù)憑證科目代號生成的報表，總帳則是總的報表?；?Delphi 的財務管理系統(tǒng)的設計與開發(fā)33結 論通過這次畢業(yè)設計的過程，使我對 ERP(企業(yè)資源計劃)進行了深入了解。概括地說，ERP 是建立在信息技術基礎上，利用現(xiàn)代企業(yè)的先進管理思想，全面地集成了企業(yè)所有資源信息，為企業(yè)提供決策、計劃、控制與經(jīng)營業(yè)績評估的全方位和系統(tǒng)化的管理平臺。經(jīng)過三個多月的設計和開發(fā)，ERP 之財務管理基本開發(fā)完畢。但是由于畢業(yè)設計時間較短，所以該系統(tǒng)還有許多不盡如人意的地方，比如用戶界面不夠美觀，出錯處理不夠，系統(tǒng)功能有待于進一步提高等這些都有待于進一步改善。尤其要感謝我的指導老師沈麗容老師，在本次畢業(yè)設計中，我從沈老師身上學到了很多東西。無論在理論上還是在實踐中，沈老師都給與我很大的幫助，使我學到以前在書本上所學不到的知識，這對于我以后的工作和學習都有一種巨大的幫助。學校在這方面也給我們提供了很大的支持和幫助，學校以及學院領導也比較重視，定期關心設計進展，為設計提供較大的方便，同時為每個設計小組配有專門的指導老師，幫助我們能順利完成整個設計。同時，他們對我的論文也提出了很多寶貴的意見。在此，我忠心的感謝他們，感謝他們一直以來對我的關愛。我不會忘記這份難得的友誼。 盡 我 所 知 ， 除 文 中 已 經(jīng) 特 別 注 明 引 用 的 內 容 和 致 謝 的 地 方 外 ，本 論 文 不 包 含 任 何 其 他 個 人 或 集 體 已 經(jīng) 發(fā) 表 或 撰 寫 過 的 研 究 成 果 。 本 人完 全 意 識 到 本 聲 明 的 法 律 結 果 由 本 人 承 擔 。論文密級：□公開 □保密（___年__月至__年__月）(保 密 的 學 位 論 文 在 解 密 后 應 遵 守 此 協(xié) 議)作者簽名：_______ 導師簽名：______________年_____月_____日 _______年_____月_____日基于 Delphi 的財務管理系統(tǒng)的設計與開發(fā)37獨 創(chuàng) 聲 明本人鄭重聲明：所呈交的畢業(yè)設計(論文)，是本人在指導老師的指導下，獨立進行研究工作所取得的成果，成果不存在知識產(chǎn)權爭議。對本文的研究做出重要貢獻的個人和集體均已在文中以明確方式標明。 作者簽名: 二〇一〇年九月二十日 畢業(yè)設計（論文）使用授權聲明本人完全了解濱州學院關于收集、保存、使用畢業(yè)設計（論文）的規(guī)定。（保密論文在解密后遵守此規(guī)定） 作者簽名: 二〇一〇年九月二十日基于 Delphi 的財務管理系統(tǒng)的設計與開發(fā)38致 謝時間飛逝，大學的學習生活很快就要過去，在這四年的學習生活中，收獲了很多，而這些成績的取得是和一直關心幫助我的人分不開的。本次畢業(yè)設計大概持續(xù)了半年，現(xiàn)在終于到結尾了。經(jīng)過這次畢業(yè)設計，我的能力有了很大的提高，比如操作能力、分析問題的能力、合作精神、嚴謹?shù)墓ぷ髯黠L等方方面面都有很大的進步。沒有他們的幫助，我將無法順利完成這次設計。郭謙功老師淵博的知識、嚴謹?shù)淖黠L和誨人不倦的態(tài)度給我留下了深刻的印象。再次對周巍老師表示衷心的感謝。另外，我還要感謝大學四年和我一起走過的同學朋友對我的關心與支持，與他們一起學習、生活，讓我在大學期間生活的很充實，給我留下了很多難忘