【導(dǎo)讀】的工作轉(zhuǎn)為計(jì)算機(jī)自動(dòng)處理，從而減輕了人們的工作量。了介紹，并對(duì)Delphi與數(shù)據(jù)庫(kù)的連接所用到的ODBC及BDE進(jìn)行了簡(jiǎn)單的論述。在第二部分中，對(duì)該系統(tǒng)作了需求分析，并對(duì)該系統(tǒng)的功能進(jìn)行了設(shè)定，對(duì)其建立了模型。菜單系統(tǒng)和工具欄，以及對(duì)系統(tǒng)的使用說(shuō)明。統(tǒng)，教師薪金管理系統(tǒng)的輸入、修改、查詢窗體的使用及代碼進(jìn)行了介紹。在第七部分中，對(duì)數(shù)據(jù)報(bào)表模塊進(jìn)行了詳細(xì)的介紹。最后，對(duì)整個(gè)做畢業(yè)設(shè)計(jì)的過(guò)程進(jìn)行了分析與總結(jié)。

　　

【正文】 39。講師 39。 then gzl:=ks*7 河北經(jīng)貿(mào)大學(xué)畢業(yè)論文 24 else if zc=39。助教 39。then gzl:=ks*8。 end else //首次班數(shù)。 if c1 then begin if (zc=39。教授 39。)or (zc=39。副教授 39。) then gzl:=ks*6 else if zc=39。講師 39。 then gzl:=ks*7 else if zc=39。助教 39。then gzl:=ks*8。 end else begin //重復(fù)班數(shù)。 cbs:=strtoint( )。 gzl:=ks*3*(cbs1)。 end。 if strtoint( )0 then gzl:=gzl+(strtoint()1)*。 //合班課的計(jì)算。 gzl1:=int(gzl)。 end。 以上與表的連接及工作量的計(jì)算都在添加按鈕的 Click事件中。 取消的代碼為： procedure (Sender: TObject)。 begin :=39。39。 :=39。39。 :=39。39。 :=39。39。 河北經(jīng)貿(mào)大學(xué)畢業(yè)論文 25 :=39。39。 :=39。39。 :=39。39。 end。 退出按鈕的代碼為： 。 //jkgzl是講課工作量窗體的名稱(chēng)。 （ 2）點(diǎn)擊其他按鈕可以填寫(xiě)其他類(lèi)型的工作量，在其他窗體中形式與該窗體類(lèi)似。在此就不在闡述了。 （二） 教師工作量修改模塊 教師工作量修改和教師工作量輸入窗體類(lèi)似，其代碼參考教師情況修改代碼。 （三）教師工作量查詢模塊 1． 設(shè)計(jì)目的 為了方便教師查詢工作量，本系統(tǒng)可以簡(jiǎn)單查詢，即只查該教師工作量的名稱(chēng) 及各類(lèi)工作量的多少；也可以詳細(xì)查詢，即可查各類(lèi)工作量的得來(lái)原因均能在該窗體中顯示。 2． 設(shè)計(jì)思想 該模塊采用了用戶向?qū)У乃枷耄谝粋€(gè)窗體上放置了兩個(gè)窗體的部件，在窗體顯示時(shí)會(huì)隱含大部分部件，當(dāng)符合某些條件時(shí)，才會(huì)有針對(duì)性的顯示對(duì)應(yīng)的部件，通過(guò)對(duì)部件可視屬性的控制來(lái)使窗體看上去有很多虛頁(yè)面，具體的說(shuō)，當(dāng)用戶選擇簡(jiǎn)單查詢時(shí)，相應(yīng)的部件就會(huì)被顯示，而與此項(xiàng)功能無(wú)關(guān)的部件就會(huì)被隱含，窗體的外觀就會(huì)變成特定的功能窗體的樣子，當(dāng)用戶選擇詳細(xì)查詢時(shí)，相應(yīng)的部件就會(huì)按照預(yù)先的設(shè)計(jì)隱含或者顯示，來(lái)完成詳細(xì)查詢的功能。這樣用設(shè)計(jì) 時(shí)的繁瑣換取了運(yùn)行期的方便和易用。并由于在一個(gè)窗體上完成了很多的工作，同時(shí)也節(jié)約了系統(tǒng)資源。 3． 窗體及代碼 （ 1）設(shè)計(jì)時(shí)窗體為： 河北經(jīng)貿(mào)大學(xué)畢業(yè)論文 26 圖 53 （ 2）當(dāng)選擇簡(jiǎn)單查詢時(shí)： 圖 54 由于 TTable部件的 Filter屬性僅僅是對(duì)記錄進(jìn)行一次過(guò)濾，已經(jīng) 不能很好的完成復(fù)雜的查詢功能。因此通用查詢模塊的關(guān)鍵部件采用 Tquery部件，查詢?nèi)渴褂?SQL語(yǔ)言完成。 查詢按鈕主要代碼為： (‘select*from dbo.‘工作量 ’where ‘教師編號(hào) ’=bh’)。 （ 3） 當(dāng)選擇詳細(xì) 查詢時(shí)： 河北經(jīng)貿(mào)大學(xué)畢業(yè)論文 27 圖 55 該窗體與上一個(gè)窗體的方法相同，只是每個(gè) Dbgrid 組件對(duì)應(yīng)一個(gè) Ttable組件，一個(gè) Datasource組件和一個(gè) Query 組件，對(duì)應(yīng)每個(gè) Query組件進(jìn)行編程，在此不再重復(fù)。 六、教師薪金子管理系統(tǒng) 在該系統(tǒng)中設(shè)計(jì)了教師薪金輸入模塊、教師薪金修改模塊和教師薪金查詢模塊。 （一）教師薪金輸入模塊 1． 設(shè)計(jì)目的 為了方便教師工資的管理，設(shè)計(jì)了該系統(tǒng)，該系統(tǒng)是通過(guò)教師編號(hào)來(lái)設(shè)計(jì)教師工資帳號(hào)的，即每個(gè)教師編號(hào)便為教師的帳號(hào)。 2． 設(shè)計(jì)思想 該窗體的核心思想是將管理員輸入的教師薪金情況通過(guò)程序添加 到工資表中。 系統(tǒng)將教師工資相關(guān)信息作為記錄保存工資表中。管理員對(duì)教師工資情況的輸入均轉(zhuǎn)化為對(duì)該數(shù)據(jù)表的插入操作。項(xiàng)目參數(shù)就是該數(shù)據(jù)表的字段，包括教師編號(hào)，基本工資、獎(jiǎng)金、福利津貼等，管理員輸入完信息后就會(huì)將數(shù)據(jù)存入表中。 3． 窗體及代碼 教師薪金輸入系統(tǒng)的窗體為： 河北經(jīng)貿(mào)大學(xué)畢業(yè)論文 28 圖 61 由管理員輸入教師編號(hào)，系統(tǒng)自動(dòng)查詢此帳號(hào)是否存在于教師表中，如果不存在，不允許建帳，建帳日期默認(rèn)為當(dāng)天的日期。如果存在，則教師的基本信息會(huì)自動(dòng)添入，然后手工輸入教師的工資項(xiàng)目，如果教師沒(méi)有此工資項(xiàng)目，則可以不添，系統(tǒng)將默認(rèn)其為 0。備 注欄供用戶添入備注信息。所有項(xiàng)目都錄入后，單擊保存按鈕，所有項(xiàng)目都將被保存到工資表中，窗體中所有項(xiàng)目變?yōu)榭?，然后您可以繼續(xù)輸入下一位職員的項(xiàng)目。所有的職員項(xiàng)目都輸入完后，單擊退出按鈕退出該窗體。 該窗體提供給管理員一個(gè)指定工資年月的界面，在窗體的 Create 事件中，取了當(dāng)前操作系統(tǒng)的日期，在該窗體中有一個(gè) DateTimePicker 部件，用于顯示當(dāng)前系統(tǒng)日期，然后用 Decodedate( )函數(shù)將當(dāng)前系統(tǒng)日期分解為月，日，年三個(gè)變量，此窗體采用了兩個(gè)微調(diào)部件 UpDown來(lái)和編輯框協(xié)作，方便管理員操作。 添加 和取消的編碼和教師基本情況輸入窗體是同一種思想，代碼基本相同。 （二）教師薪金修改模塊 教師薪金修改模塊與教師工作量修改模塊類(lèi)似，代碼大致相同不再闡述。 （三）教師薪金查詢模塊 河北經(jīng)貿(mào)大學(xué)畢業(yè)論文 29 1． 設(shè)計(jì)目的 教師薪金查詢模塊是由教師輸入教師編號(hào)來(lái)查詢自己的工資情況。 2． 設(shè)計(jì)思想 核心思想是將該窗體與教師表和工資表進(jìn)行連接，當(dāng)輸入教師編號(hào)時(shí)，同時(shí)對(duì)兩個(gè)表進(jìn)行查找，并將其通過(guò)組件查詢顯示。 3． 窗體及代碼 窗體為： 圖 62 該窗體查詢與教師基本情況查詢的編程思想相同，所以在此不再過(guò)多闡述。 河北經(jīng)貿(mào)大學(xué)畢業(yè)論文 30 七、數(shù)據(jù)報(bào)表模塊 （一）設(shè)計(jì)目的 在管理信息系統(tǒng)中，報(bào)表的作用時(shí)十分明顯的。對(duì)于通用的報(bào)表模塊，可以讓用戶自行定義要報(bào)表的項(xiàng)目，然后生成報(bào)表。進(jìn)行預(yù)覽或打印。并可以將報(bào)表以不同的文件格式保存起來(lái)。 （二）設(shè)計(jì)思想 此模塊被調(diào)用時(shí)，由系統(tǒng)將所需的數(shù)據(jù)表傳送給模塊，然后由用戶從項(xiàng)目集中選擇要生成的報(bào)表項(xiàng)目，然后動(dòng)態(tài)生成報(bào)表。 為了動(dòng)態(tài)生成報(bào)表，自定義了過(guò)程 CreateList。此過(guò)程流程圖如下： 圖 71 創(chuàng)建 TTable 部件 設(shè)定 TTable 屬性 讀入報(bào)表項(xiàng)目 設(shè)置顯示寬度 創(chuàng)建報(bào)表 設(shè)置顯示寬度和表頭信息 調(diào)整項(xiàng)目間距和報(bào)表布局 打印或預(yù)覽 河北經(jīng)貿(mào)大學(xué)畢業(yè)論文 31 首先創(chuàng)建一個(gè) TTable部件然后指定他具有的數(shù)據(jù)庫(kù)名和數(shù)據(jù)表名并設(shè)置為只讀狀態(tài)。然后將用戶選定的項(xiàng)目從列表框中讀出并保存到一個(gè)字符串列表類(lèi)型（ StringList）的變量中。 然后依據(jù)第一個(gè)項(xiàng)目的來(lái)設(shè)定所需的顯示寬度，顯示寬度的設(shè)置將反映到報(bào)表中。然后調(diào)用 QRCreateList方法來(lái)創(chuàng)建報(bào)表。 由于是動(dòng)態(tài)創(chuàng)建的報(bào)表，所以要?jiǎng)討B(tài)調(diào)整項(xiàng)目間的位置和互相的間距。采用了循環(huán)語(yǔ)句將每個(gè)項(xiàng)目的距離一一調(diào)整。 調(diào)整位置的代碼如下： for ii := 0 to 1 do if [ii] is TQRPrintable then with TQRPrintable([ii]) do Left := Left (5 * ii)。 for ii := 0 to 1 do if [ii] is TQRPrintable then with TQRPrintable([ii]) do Left := Left (5 * ii)。 調(diào)整完成后將顯示報(bào)表。 系統(tǒng)還提供了將報(bào)表保存為文件的功能?？梢詫?bào)表保存為 HTML， TXT和 RTF 格式。依靠加入格式轉(zhuǎn)換部件和 SaveDialog 部件的應(yīng)用， 這個(gè)對(duì)話框部件可以指定要保存的格式。 （三）使用說(shuō)明 報(bào)表設(shè)置的界面如下： 河北經(jīng)貿(mào)大學(xué)畢業(yè)論文 32 圖 72 用戶可以在下拉菜單中選擇數(shù)據(jù)庫(kù)，左邊的列表框?qū)⒊霈F(xiàn)該表的字段，可將左面列表框的項(xiàng)目移到右面的報(bào)表項(xiàng)目列表框中?？蓡为?dú)移動(dòng)也可整體移動(dòng)。然后選擇打印預(yù)覽或打印。 點(diǎn)擊另存為按鈕可以出現(xiàn)保存文件對(duì)話框，可將報(bào)表保存為指定格式。 河北經(jīng)貿(mào)大學(xué)畢業(yè)論文 33 八、總結(jié) 教師工作量及薪金管理系統(tǒng)的設(shè)計(jì)是一項(xiàng)比較有探索性的課題。因?yàn)榇讼到y(tǒng)沒(méi)有一個(gè)事實(shí)上的標(biāo)準(zhǔn)來(lái)衡量設(shè)計(jì)步驟。我們對(duì)于該信息查詢系統(tǒng)的概念以及不同用戶需求的側(cè)重點(diǎn)還有待明確，因此所應(yīng)完成 的工作也不一而同。這個(gè)畢業(yè)設(shè)計(jì)努力完成了事先設(shè)想的功能，但仍然有一些無(wú)法解決的問(wèn)題留有以后探討。 由于此系統(tǒng)在設(shè)計(jì)前期對(duì)用戶需求分析做的不夠詳細(xì)，致使系統(tǒng)建立進(jìn)程減慢，還有該系統(tǒng)雖基本功能實(shí)現(xiàn)了，但形式比較簡(jiǎn)單。由于我們?cè)诮?shù)據(jù)庫(kù)時(shí)，為了保證數(shù)據(jù)的安全，設(shè)置了安全性，導(dǎo)致在運(yùn)行程序時(shí)，當(dāng)用到數(shù)據(jù)庫(kù)時(shí)，要輸入密碼，該問(wèn)題有待與解決。由于條件有限，此系統(tǒng)還有一些地方需要進(jìn)一步改進(jìn)。如教師薪金管理模塊的功能還能擴(kuò)展。 河北經(jīng)貿(mào)大學(xué)畢業(yè)論文 34 結(jié)束語(yǔ) 經(jīng)過(guò)近兩個(gè)月的努力，在多方面的幫助下，本開(kāi)發(fā)小組終于較圓滿的完成了畢業(yè)設(shè) 計(jì)和畢業(yè)論文。 在此，首先感謝學(xué)校給了我們這次機(jī)會(huì)，同時(shí)，特別感謝崔自然老師在畢業(yè)設(shè)計(jì)過(guò)程中與畢業(yè)論文撰寫(xiě)期間的精心指導(dǎo)！ 通過(guò)此次畢業(yè)設(shè)計(jì)，我從各個(gè)方面都有所提高，特別是程序設(shè)計(jì)能力有明顯提高。由于平時(shí)很少有實(shí)踐的機(jī)會(huì)，雖然學(xué)習(xí)了理論知識(shí)，但很死板，經(jīng)過(guò)這次畢業(yè)設(shè)計(jì)，大大提高了自己的對(duì)手能力。 這次畢業(yè)設(shè)計(jì)使用了以前從未接觸過(guò)的開(kāi)發(fā)工具 DELPHI6和 SQL Server。由于自己以前幾乎沒(méi)有接觸過(guò)任何面向?qū)ο蟮恼Z(yǔ)言，所以開(kāi)始學(xué)習(xí)起來(lái)比較困難。但是通過(guò)自學(xué)和閱讀大量的計(jì)算機(jī)書(shū)籍，開(kāi)拓了自己的視野，取得了不 小的進(jìn)步。又通過(guò)對(duì)實(shí)際系統(tǒng)的設(shè)計(jì)，提高了自己的思維能力和動(dòng)手能力，了解了一個(gè)軟件項(xiàng)目應(yīng)該如何入手進(jìn)行分析、設(shè)計(jì)、實(shí)現(xiàn)、調(diào)試等一些具體步驟，真正達(dá)到了理論和實(shí)踐相結(jié)合的目的。 另一個(gè)重要的收獲是：親身感受到在軟件開(kāi)發(fā)中，協(xié)作的重要性?，F(xiàn)在的系統(tǒng)開(kāi)發(fā)很少是單人單機(jī)獨(dú)自開(kāi)發(fā)的，它需要多人的通力合作。這使得個(gè)人分工進(jìn)一步細(xì)化，每個(gè)人負(fù)責(zé)一部分的工作。但由于涉及到主體的差異，各個(gè)模塊的風(fēng)格，設(shè)計(jì)思想的不同，因此就需要在程序設(shè)計(jì)過(guò)程中，發(fā)揮每個(gè)人的合作精神，提倡團(tuán)隊(duì)思想，緊密協(xié)作，互相加強(qiáng)溝通和交流，才能對(duì)一個(gè)問(wèn)題的解 決獲得較優(yōu)的方案，從而最終保證系統(tǒng)的統(tǒng)一性，完整性，為系統(tǒng)的進(jìn)一步完善和擴(kuò)充打下良好的基礎(chǔ)。這種分工協(xié)作方式非常有利于發(fā)揮個(gè)人特長(zhǎng)，并使得開(kāi)發(fā)時(shí)間大為縮短。 此次畢業(yè)設(shè)計(jì)的不足之處在于對(duì)開(kāi)發(fā)工具不夠熟悉，設(shè)計(jì)的前期準(zhǔn)備又不很充分，使得設(shè)計(jì)的時(shí)間很緊張，影響了系統(tǒng)的功能的完善性。希望老師能給出批評(píng)指導(dǎo)意見(jiàn)，以期今后改正。 在本次程序設(shè)計(jì)過(guò)程中，我得到了許多同學(xué)熱心幫助和指導(dǎo)，在此一并表示衷心的感謝！ 河北經(jīng)貿(mào)大學(xué)畢業(yè)論文 35 參考文獻(xiàn) [1] Delphi 5 實(shí)用例庫(kù)與高級(jí)編程技巧 ，李峰 ， 聶文惠， 第 1 版， 人民郵電出版社 ， 2021年 7月 [2 ] Delphi 5 徹底研究 ， 陳燦煌， 陳周廷， 第 1 版 中國(guó)鐵道出版社 ， 2021 年 10 月 [3] Delphi 最佳專(zhuān)輯 ， 邢增平 ， 第 1 版 人民郵電出版社 ， 2021 年 1 月 [4] Delphi 5 編程指南 ， 楊峰 ， 李增民 ， 崔建營(yíng)， 趙國(guó)綱， 第一版 人民郵電出版社 ， 2021年 10 月 [5] Delphi 數(shù)據(jù)庫(kù)開(kāi)發(fā) ， 飛思科技 ， 第 3版 電子工業(yè)出版社 ， 2021年 4月 [6] Delphi 實(shí)用程序 100 例 ， 段興 ， 第 1版 人民郵電出版社 ， 2021年 4月 [7] Delphi 5 數(shù)據(jù)庫(kù)開(kāi)發(fā)技術(shù) ， 毛峻 ，孟祥文， 王淑芳 ， 第 1 版 機(jī)械工程出版社 ， 2021年 5月 [8] Delphi 深度編程及其項(xiàng)目應(yīng)用開(kāi)發(fā) ， 李存斌 ， 汪兵 ， 第 1版 中國(guó)水利水電出版社， 2021年 9月 [9] SQL Server 高手速成 ， 步行者工作室 ， 第 1 版 兵器工業(yè)出版社 ， 1999年 5月