【導(dǎo)讀】步伐，是學(xué)生主動學(xué)習(xí)計算機(jī)知識的基礎(chǔ)條件。為能使學(xué)生能夠更多的學(xué)習(xí)計算。機(jī)知識，適應(yīng)社會發(fā)展的需要，各高校都有自己的公共機(jī)房。然而，這使管理工。將出現(xiàn)問題，難以收到理想的效果。為提高實(shí)驗(yàn)室的管理，該畢業(yè)設(shè)計結(jié)合高等。該系統(tǒng)包括了登陸模塊、系統(tǒng)費(fèi)率模塊、上機(jī)管理模塊設(shè)計。理員只需點(diǎn)“上機(jī)”按扭即可。結(jié)帳也很方便，點(diǎn)“下機(jī)”按扭自動結(jié)帳，并顯。示該用戶此次上機(jī)的總用時和相應(yīng)收費(fèi)情況。該系統(tǒng)支持多費(fèi)率計費(fèi)功能。員可以自行設(shè)置各種收費(fèi)標(biāo)準(zhǔn)。能也是系統(tǒng)的核心之一。該系統(tǒng)是大型數(shù)據(jù)庫Access與DELPHI技術(shù)的完美結(jié)。合，以方便性，安全性，穩(wěn)定性，易操作性為特點(diǎn)。化管理模式已成為學(xué)校實(shí)驗(yàn)室面臨的一項(xiàng)緊迫而重要的任務(wù)。為此，針對實(shí)驗(yàn)室的管理現(xiàn)狀，建立了。本，培養(yǎng)學(xué)生的科技意識。需求，許多計算機(jī)機(jī)房都紛紛對外開放，實(shí)行計時收費(fèi)。但隨著上機(jī)人數(shù)的增多，管理人員的有限等因素，計算機(jī)機(jī)房的管理成了一個非常困難的問題。

　　

【正文】 ion 關(guān)閉 31 下機(jī)流程如下圖 ： 圖 下機(jī)流程圖 實(shí)現(xiàn)功能代碼： procedure (Sender: TObject。 var Action: TCloseAction)。var AUpline:TUpline。 begin inherited。 showmessage(39。下機(jī)成功！ 39。)。 if ([39。 卡號 39。],date,time) then begin :=false。 :=true。 // showmessage(39。下機(jī)成功！ 39。)。 。 end。 end。 32 procedure (Sender: TObject)。 var listitem:Tlistitem。 shangjidatetime:string。 miao:real； begin inherited。 。 listitem:=。 :=[39?？ㄌ?39。]。 shangjidatetime:= [39。 上機(jī)日期39。]+[39。上機(jī)時間 39。]。 (shangjidatetime)。 (datetimetostr(now))。 (inttostr(GetTime(strtodatetime(shangjidatetime),now)))。 miao:=GetTime(strtodatetime(shangjidatetime),now)。 //(floattostr(miao))。 (floattostr(miao*))。 end。 function (UpTime, DownTime: TDateTime): word。 var Up,Down: TSystemTime。 begin DateTimeToSystemTime(UpTime,Up)。 DateTimetoSystemTime(DownTime,Down)。 Result:=(( 33 系統(tǒng)費(fèi)率設(shè)置 系統(tǒng)費(fèi)率是一個比較重要的模塊，在此設(shè)置的費(fèi)率會在系統(tǒng)的其他很多地方用到，而且我們也知道在不同的時間段里我們也有不同收費(fèi)標(biāo)準(zhǔn)，而這個標(biāo)準(zhǔn)就是在這里設(shè)置的。此模塊還包括了設(shè)置最低提示機(jī)時等功能。詳細(xì)設(shè)計時各對象屬性如表 ： 表 計費(fèi) 費(fèi)率設(shè)置界面對象屬性表 對象名（控件名） 屬性 取值（說明） Palclient(tpanel) Alignment Tacenter taborader 4 name Palclient Editcharge(TEdit) Enabled true ImeMode imdontcare name Esitcharge Editmintime(tEdit) Text 空白 passwordchar 0 Hideselection True IbBtnok(TlableBtn) Caption 確定 Align AlNone Enabled True Transparent True IbBtnexit(TlableBtn) Caption 取消 Enabled true HelpType Htcontext 功能實(shí)現(xiàn)源代碼： procedure (Sender: TObject)。 begin inherited。 :=IntToStr()。 :=IntToStr()。 :=IntToStr()。 :=IntToStr()。 end。 procedure (Sender: TObject。 var Action: TCloseAction)。 begin inherited。 Action:=caFree。 end。 34 procedure (Sender: TObject)。 var Temp:TSysSetup。 begin inherited。 try with Temp do begin FCharge :=StrToInt()。 FMinTime :=StrToInt()。 FAutoHide :=StrToInt()。 FAutoSave :=StrToInt()。 :=FCharge。 :=FMinTime。 :=FAutoHide。 :=FAutoSave。 end。 finally ()。 ModalResult:=mrOK。 end。 end。 procedure (Sender: TObject。 var Key: Char)。 begin inherited。 if not(Key in [39。039。..39。939。,8,13]) then begin Key:=0。 Beep。 end。 end。 end． 35 第 四 章 系統(tǒng)調(diào)試與運(yùn)行結(jié)果說明 軟件測試 是 軟件開發(fā) 過程的重要組成部分，是用來確認(rèn)一個 程序 的品質(zhì)或性能是否符合開發(fā)之前所提出 的一些要求。 軟件 測試就是在軟件投入運(yùn)行前，對軟件需求 分析、設(shè)計規(guī)格說明和編碼的最終 復(fù)審 ，是 軟件質(zhì)量保證 的關(guān)鍵步驟。軟件測試是為了發(fā)現(xiàn)錯誤而執(zhí)行程序的過程。 軟件測試在軟件生存期中橫跨兩個階段：通常在編寫出每一個模塊之后就對它做必要的測試（稱為 單元測試 ）。編碼和單元測試屬于軟件生存期中的同一個階段。在結(jié)束這個階段后對 軟件系統(tǒng) 還要進(jìn)行各種綜合測試，這是軟件生存期的另一個獨(dú)立階段，即測試階段。 軟件測試的目的 : 第一是確認(rèn)軟件的質(zhì)量，其一方面是確認(rèn)軟件做了你所期望的事情（ Do the right thing），另一方面是確認(rèn)軟件以正確的方式來做了這個事件（ Do it right）。 第二是提供信息，比如提供給開 發(fā)人員或程序經(jīng)理的反饋信息，為風(fēng)險評估所準(zhǔn)備的信息。 第三軟件測試不僅是在測試軟件產(chǎn)品的本身，而且還包括軟件開發(fā)的過程。如果一個軟件產(chǎn)品開發(fā)完成之后發(fā)現(xiàn)了很多問題，這說明此軟件開發(fā)過程很可能是有缺陷的。因此軟件測試的第三個目的是保證整個軟件開發(fā)過程是高質(zhì)量的。 單元測試是針對軟件設(shè)計的最小單位 —— 程序模塊，進(jìn)行正確性檢驗(yàn)的測試工作。其目的在于發(fā)現(xiàn)每個程序模塊內(nèi)部可能存在的差錯。 在編碼的過程中作單元測試，其花費(fèi)是最小的，而回報卻特別優(yōu)厚的。在編碼的過程中考慮測試問題，得到的將是更優(yōu)質(zhì)的代碼，因?yàn)樵谶@時您 對代碼應(yīng)該做些什么了解得最清楚。如果不這樣做，而是一直等到某個模塊崩潰了，到那時可能已經(jīng)忘記了代碼是怎樣工作的。即使是在強(qiáng)大的工作壓力下，您也還必須重新把它弄清楚，這又要花費(fèi)許多時間。進(jìn)一步說，這樣做出的更正往往不會那么徹底，可能更脆弱，因?yàn)閱净氐睦斫饪赡懿荒敲赐耆?單元測試的目標(biāo)在于不僅測試代碼的功能性，還需確保代碼在結(jié)構(gòu)上可靠且健全，并且能夠在所有條件下正確響應(yīng)。如果這些系統(tǒng)中的代碼未被適當(dāng)測試，則其弱點(diǎn)可被用于侵入代碼，并導(dǎo)致安全性風(fēng)險（例如內(nèi)存泄漏或被竊指針）以及性能問題。 執(zhí)行完全的單元測試，可以 減少應(yīng)用級別所需的工作量，并且徹底減少發(fā)生 36 誤差的可能性。但是如果手動執(zhí)行，單元測試可能需要大量的工作。執(zhí)行高效率單元測試的關(guān)鍵是自動化。 用戶登錄窗口的測試 該測試的目的是保證登陸窗口的正確性與在錯誤發(fā)生時的容錯與糾錯性。具體通過在登陸框中輸入空用戶名，和錯誤的用戶密碼來檢測系統(tǒng)的出錯運(yùn)行情況。要求系統(tǒng)在遇到這些情況時能給出正確的錯誤提示。 提示結(jié)果如圖 ： 圖 登陸失敗提示界面 上機(jī)管理窗口的測試 該測試的目的是要求系統(tǒng)能正確 分辨用戶，在輸入錯誤的卡號或在么一卡號正在使用的情況下再次輸入這一卡號時能給出正確的錯誤提示。 提示結(jié)果如圖 ， ： 圖 上機(jī)卡號輸入錯誤提示界面 圖 上機(jī)卡號重復(fù)輸入提示界面 37 結(jié)束語 經(jīng)歷了二個月的磨練，感覺自己學(xué)到了不少的東西，大學(xué)四年中，這二個月是不平凡的二個月，從開始著手做論文到論文結(jié)束這段時間有過憂郁和煩躁；有過高興和驚奇；也 有過失落和無助。在做論文當(dāng)中遇到了不少的麻煩，有時候一個小小的問題都需要糾纏一天甚至幾天，但是當(dāng)你解決一個難題，那種喜悅的感覺真的很叫人回味。 雖然遇到了很多的挫折，但是我的收獲還是很大的，我體會到了做好總體需求和設(shè)計的重要性，否則當(dāng)遇到問題再去修改時，前面的很多工作就會白費(fèi)掉。而且在整個的設(shè)計過程中，我還學(xué)會了在浩瀚的書籍資料世界和 Inter 世界中中迅速查找自己想要的內(nèi)容的方法。另外對于 B/S 結(jié)構(gòu)的 Web 應(yīng)用程序有更深刻的認(rèn)識，對于 ACCESS 中連接數(shù)據(jù)庫。編寫論文的過程同樣是一個學(xué)習(xí)的過程，它是對 整個軟件設(shè)計過程的反映，為設(shè)計做了一個完美的總結(jié)。 通過這二個月的學(xué)習(xí)與努力，使我明白了無論什么事情只要自己努去做，就沒有辦不成的；通過這二個月的學(xué)習(xí)與努力，使我掌握了完成一個 B/S 結(jié)構(gòu)系統(tǒng)的基本方法 :怎樣進(jìn)行系統(tǒng)分析；進(jìn)行編程規(guī)范制定、功能設(shè)計、頁面設(shè)計、數(shù)據(jù)庫設(shè)計和接口設(shè)計，這些都是在以前的課程學(xué)習(xí)和實(shí)習(xí)過程中沒有完全掌握的；通過這二個月的學(xué)習(xí)，我比較好的掌握了 Delphi 編程語言 ACCESS，從開始的一無所知到用它做出程序來，我確實(shí)花了些功夫，這期間我查閱了大量的關(guān)于Delphi 的資料，包括書本上 的、網(wǎng)絡(luò)上的，雖然有時候不能查找到符合我的要求的資料，但查找到相關(guān)的資料，仍然使我 受益匪淺；通過這二個月的學(xué)習(xí)，為我以后走向社會提供了很好的實(shí)踐，并提高了自己在社會的競爭能力。 當(dāng)然，由于時間和知識水平的限制，設(shè)計中存在不完善的地方在所難免，敬請各位老師批評指正，我會努力的！ 38 參考文獻(xiàn) [1] 楊紅和 .公共計算機(jī)機(jī)房管理和維護(hù)初探 [J]. 漳州師范學(xué)院學(xué)報 (自然 科學(xué) 版 ).20xx(02) [2] 王亞琴 .梁方 .高校計算機(jī)公共機(jī)房的管理與維護(hù) [J]. 電腦知識與技術(shù) .20xx(17) [3] 武麗娟 .王國強(qiáng) . 計算機(jī)機(jī)房的維護(hù)與管理 [J]. 長治學(xué)院學(xué)報 .20xx(02) [4] 劉丹 .馬同偉 .孫冬 . 計算機(jī)機(jī)房管理中若干問題的探討 [J].河南高等機(jī)電專 科學(xué) 校學(xué)報 .20xx(02) [5] 石幫榮 .校園網(wǎng)絡(luò)計費(fèi)系統(tǒng)的研究 與開發(fā) [J].桂林師范高等?？茖W(xué)校學(xué)報 ,20xx,17(1). [6] 徐瑞圓 ,陳琦等 .基于 B/S 結(jié)構(gòu)的銷售管理系統(tǒng) [J].河北工業(yè)科技 . 20xx,9（ 1）： 23~41 [7] 李維． Delphi7 高效數(shù)據(jù)庫程序設(shè)計 [M]． 北京： 機(jī)械工業(yè)出版社， 20xx [8] 劉 淳 ． 機(jī)房計費(fèi)管理系統(tǒng)開發(fā)技術(shù)探討 [J]． 交通與計算機(jī) 學(xué)刊． 20xx， 19： 96～108 [9] 魏江江，李青，孫立京 ． Delphi 編程百例通 [M]． 北京：科學(xué)出版社， 20xx [10] 趙國芬． 開放式計算機(jī)機(jī)房的管理對策 [J]．河南大學(xué)常州分校學(xué)報 ． 20xx， 5： 52～61 [11] 白志文 , 叢淑麗．開放性機(jī)房管理系統(tǒng)軟件開發(fā)研究 [J]．長春大學(xué)學(xué)報． 20xx， 7： 34～56 [12] 劉俊 ,錢瑞明 .基于 B/S 結(jié)構(gòu)面向供應(yīng)鏈的供銷管理系統(tǒng)設(shè)計 [J].微計算機(jī)信息 . ：28~54 [13] 陳衛(wèi) . B/S 結(jié)構(gòu)應(yīng)用程序開發(fā)秘 籍 [M].北京：國防工業(yè)大學(xué)出版社 ,20xx [14 ] 王艷鳳． 實(shí)驗(yàn)室信息管理系統(tǒng)的設(shè)計與開發(fā) [J]高等函授學(xué)報． 20xx， 6： 50～ 63 39 致 謝 在此論文完成這際，謹(jǐn)向所有關(guān)心和幫助我的老師、同學(xué)表示我最衷心的感謝！ 我要特別感謝的是我的導(dǎo)師文明全，感謝他兩個多月以來對我的悉心指導(dǎo)，從論文的選題、程序的框架 設(shè)計到具體的編程實(shí)現(xiàn)。從文老師扎實(shí)的專業(yè)功底和嚴(yán)謹(jǐn)?shù)闹螌W(xué)態(tài)度中，我所感受到的不僅是他的淵博學(xué)識，更重要的是他永不滿足的學(xué)者風(fēng)范。總之，畢業(yè)設(shè)計中，我從文老師身上學(xué)到的不光是動手運(yùn)用理論知識，解決實(shí)際問題的能力，更是永遠(yuǎn)在路上的前進(jìn)信念。 同時還要感謝計算機(jī)系的領(lǐng)導(dǎo)多年來對我的培養(yǎng)和支持，是他們?yōu)槲姨峁┝肆己玫膶W(xué)習(xí)環(huán)境和機(jī)會。 感謝各位專家和評委耐心審閱我的論文，他們提出了許多寶貴的意見和建議。 還要感謝我的室友，在我不懂需要幫助的時候，不厭其煩的伸出援助之手。 感謝所有曾經(jīng)給我理解、關(guān)心與幫助的朋友們。