軟件工程任務書

1、課程設計任務書及成績評定一、 課程設計的目的和任務系統(tǒng)的開發(fā)和應用目的是使售票活動能夠在多個不同的地點（除火車站外）進行并且能夠使旅客通過系統(tǒng)查詢到自己所需要的出行信息。該系統(tǒng)的中心功能是列車和售票信息的查詢功能和售票功能。這是兩個功能在實現(xiàn)上十分的類似，售票需要首先先通過查詢的方式得到滿足要求的車票，然后再進行售票。所以售票功能可以看成是列車和售票信息查詢功能的延伸。除了中心功能外，該系統(tǒng)還有關于增減列車，增減售票員，向數據庫中添加車票等等。這些功能都是為了實現(xiàn)售票功能而做的準備。這樣整個系統(tǒng)才能夠更加完善，在系統(tǒng)需要修改的時候，才能更加的方便。系統(tǒng)的用戶可以分為旅客、網點售票員、車站售票員

2、，系統(tǒng)管理員這四類。由于他們權限的不同，系統(tǒng)所賦予他們的功能也是不同的。旅客在該系統(tǒng)中所應用的功能是對列車和售票信息的查詢。網點售票員在系統(tǒng)中所應用的主要功能是售票，車站售票員在系統(tǒng)中所應用的主要功能除了售票外還有退票，而系統(tǒng)的管理員所應用的功能則是對系統(tǒng)的列車信息，車票信息和售票員信息進行管理。指導教師簽字： 日期： 指導教師評語成績： 指導教師簽字： 日期： 課程設計所需軟件、硬件等一硬件：1.pc機二軟件：1.windows xp 操作系統(tǒng)2.delphi7環(huán)境3.sql server 2005課程設計進度計劃起至日期工作內容備注2011.5.1-2011.5.152011.5.16-2

3、011.6.12011.6.2-2011.6.30 nm收集資料編寫代碼運行、調試參考文獻、資料索引序號文獻、資料名稱編著者出版單位1delphi應用程序設計 李目海 電子科技大學出版社2delphi程序設計實用教程 葉核亞 電子工業(yè)出版社3delphi 2005程序設計教程 劉瑞新編著 機械工業(yè)出版社4 數據庫系統(tǒng)概論 王珊，薩師煊 高等教育出版社5 軟件工程 張海藩. 人民郵電出版社6 sql server數據庫技術及應用項目教程劉芳. 清華大學出版社7 應用軟工程原理 劉玉然8 實用軟件工程（第2版） 趙池龍 楊林 孫偉 電子工業(yè)出版社目 錄目 錄4第一章 概述51.1系統(tǒng)要求51.2系

4、統(tǒng)的功能描述5第二章 需求分析72.1需求概述72.2功能需求72.2.1列車信息及售票信息查詢72.2.2獲得售票權限72.2.3登錄系統(tǒng)82.2.4火車票的銷售及退票82.2.5列車及車票的管理82.2.6售票員的管理9第三章 系統(tǒng)需求分析103.1業(yè)務需求103.1.1業(yè)務組織103.1.2業(yè)務定義113.1.3業(yè)務流程133.2功能需求153.2.1功能組成153.2.2功能邏輯163.3數據需求183.3.1數據關系183.3.2數據定義193.3.3系統(tǒng)的數據庫設計203.3.4數據字典22第四章 詳細設計244.1 數據庫詳細設計244.1.1 數據庫環(huán)境配置244.1.2 表設

5、計及其關系設置284.2 界面設計294.2.1歡迎界面294.2.2 首頁294.2.3用戶模塊30第五章 系統(tǒng)代碼實現(xiàn)33第六章 系統(tǒng)測試456.1登陸界面456.2進入用戶模塊466.3 系統(tǒng)測試情況46第七章 總結47第一章 概述1.1系統(tǒng)要求現(xiàn)今的社會發(fā)展迅速，火車成為了人們在交通方面不可缺少的交通工具，乘坐火車出行的人越來越多，所以鐵路的客運量也在迅速的增長著。同時，時間代表的是生命。為了給人們帶來方便快捷的交通環(huán)境，鐵路系統(tǒng)采取提高列車的速度，增加客運列車等等從而來滿足大量的旅客的乘車需求。但是，現(xiàn)在人多車多的情況下，如果再像是從前一樣，在一個單一的地點售票，必然滿足不了現(xiàn)在的形

6、勢。所以就需要售票能夠在不同的地點進行，同時旅客也應該能夠在購買車票之前知道自己所需要的列車是否有票的信息。如此的情況之下，售票系統(tǒng)的需要自然是相當必要的。售票系統(tǒng)的出現(xiàn)能夠在很大的程度上解決單一地點售票所帶來的種種不便，并且能夠給想要出行的旅客帶來足夠的相關信息，使旅客們不必非要到車站的售票處，甚至不用出門就能夠知道是否有合適自己出行的車票。對于售票處的地點也從原來的單一地點（車站）變成了多個地點，可以在市內的多個地點（賓館、酒店、娛樂場所等等）。這樣給將要出行的旅客帶來了更進一步的方便。使旅客無論是在金錢還是在時間方面都能夠得到充分的節(jié)省?；疖囌臼袌龅墓芾砗鸵?guī)范問題，是困擾我們多年的一個老

7、問題，也是政府管理中的一個難點，訂票是客運業(yè)務中的一個最基本的業(yè)務，表面上看，它只是火車站業(yè)務的一個簡單的部分，但是它涉及到管理與客戶服務等多方面，因此，過去傳統(tǒng)的售票方式已經不能滿足現(xiàn)代客運業(yè)務流量劇增的客觀要求，這就要求一種全新的訂票方式網上訂票，來緩解訂票高峰時期的客運壓力，并為用戶提供方便快捷的訂票服務。本次設計便是利用開發(fā)工具java和sql server 2008數據庫共同開發(fā)的一個火車站網上訂票系統(tǒng)，它能方便快捷地運用在火車站訂票業(yè)務的營運之中。1.2系統(tǒng)的功能描述本系統(tǒng)的應用主要是針對一個始發(fā)站的。系統(tǒng)實現(xiàn)了作為一個始發(fā)站售票活動相關的基本功能。具體的功能描述如下：1) 旅客查

8、詢列車及售票信息。旅客可以通過自己的需求來查詢是否有滿足自己要求的列車。2)火車票的銷售。售票員通過旅客提供的信息查詢到滿足旅客要求的列車并將該車的車票出售給旅客。3)退票。售票員將未過期的車票退掉。4)增加一列新的列車。本系統(tǒng)的管理員向系統(tǒng)中添加一列新的列車的全部信息。5)刪除列車。系統(tǒng)的管理員將系統(tǒng)中一列列車的信息全部刪除。6)火車票的填充。系統(tǒng)的管理員向數據庫里添加火車票 。7)火車票的刪除。系統(tǒng)的管理員將過期的火車票刪除。8) 增加一名新的售票員。系統(tǒng)的管理員向系統(tǒng)中加入一個新的具有售票和退票權限的售票員。9)刪除售票員。系統(tǒng)的管理員將系統(tǒng)中的某個車站售票員或者是網點的售票員刪除。這樣

9、意味這回收了他們的售票權限。10) 網點售票員的注冊。網點售票員在通過車站方面的審查后，需要在系統(tǒng)上注冊。11)修改密碼。售票員在具有售票權限后可以進入系統(tǒng)修改自己登錄系統(tǒng)的密碼。12)用戶登錄系統(tǒng)。第二章 需求分析2.1需求概述火車站售票系統(tǒng)是一個融合火車票的銷售、退票、列車管理、車票管理、售票員管理，列車信息及售票信息查詢?yōu)橐簧淼木C合系統(tǒng)。該系統(tǒng)的一切售票相關的活動都是針對于從大連站始發(fā)的列車。通過該系統(tǒng)可以使售票相關的活動在可以訪問internet的任何地點進行。解決了單一售票地點所帶了的種種不便。該系統(tǒng)的用戶有四類，他們分別是一般用戶（旅客）、車站售票員、網點售票員，管理員。在功能方面

10、可分為以下六個部分：1) 列車信息及售票處信息查詢。2) 獲得售票權限。3) 登錄系統(tǒng)。4) 火車票的銷售及退票。5) 列車及車票的管理。6) 售票員的管理。2.2功能需求2.2.1列車信息及售票信息查詢此功能是任何能夠訪問到系統(tǒng)的用戶都擁有的功能。一般旅客用戶在購買出行的火車票前，可以登錄系統(tǒng)，通過方便自己的查詢方式，來查詢到滿足自己要求的列車,并可以確定出自己需要的某個日期是否有票可以出售。這里提供給用戶的查詢方式有兩種，一通過車次的查詢。二通過目的站的查詢。通過車次查詢，旅客已經確定了自己想要乘坐的列車的車次，便可以直接的來查詢該車次的列車的具體售票情況。通過目的站的查詢，旅客如果不知道

11、自己乘坐的列車的車次，只是知道想要去哪里，這時候就需要通過目的站來查詢滿足要求的列車及售票的情況。2.2.2獲得售票權限售票權限的獲得是指系統(tǒng)的兩種具有售票權限的用戶（包括車站售票員和網點售票員）獲得到售票權限。車站售票員獲得售票權限，車站售票員的售票權限是由系統(tǒng)管理員進行添加的。系統(tǒng)的管理員向系統(tǒng)中添加了某個車站售票員的信息后，該車站售票員就可以通過自己的工號和密碼來登錄系統(tǒng)，并進行售票及權限容許下的其他工作。網點售票員，網點售票員是通過在網絡中注冊自己的信息，來獲得售票的權限的，注冊成功后，獲得到售票的權限及其他網點售票員的其他權限。2.2.3登錄系統(tǒng)登錄系統(tǒng)包括一般用戶、車站售票員、網點

12、售票員及系統(tǒng)管理員登錄。一般用戶通過流覽器訪問該系統(tǒng)的網址，登錄到系統(tǒng)的首頁并在頁面的提示下做自己權限內的查詢。車站售票員在登錄系統(tǒng)后，在首頁上選擇自己的登錄類型并將自己的工號和密碼輸入登錄系統(tǒng)。登錄后，系統(tǒng)會顯示出車站售票員所具有的操作權限。網點售票員登錄系統(tǒng)后，在首頁上選擇自己的登錄類型并將自己的工號和密碼輸入登錄系統(tǒng)。登錄后，系統(tǒng)會顯示出網點售票員所具有的操作權限。系統(tǒng)管理員在登錄系統(tǒng)后，在首頁上選擇自己的登錄類型并將自己的工號和密碼輸入來登錄系統(tǒng)。登錄系統(tǒng)后，系統(tǒng)會顯示出系統(tǒng)管理員所具有的操作權限。2.2.4火車票的銷售及退票火車票的銷售是針對于系統(tǒng)的車站售票員和網點售票員的。在登錄屬

13、于自己的工作平臺后，通過旅客提出的乘車要求來查詢滿足要求的列車，查詢包括兩種，一是車次查詢，二是目的站查詢。并將該車的車票出售。退票是車站售票員才有的權限。退票是指已售出的火車票在列車開出之前將票退回到數據庫中，退出的車票還能繼續(xù)出售。2.2.5列車及車票的管理列車及車票的管理包括增加列車信息、刪除列車信息、火車票的填充，火車票的刪除。增加列車，系統(tǒng)管理員將一列新的列車的全部信息輸入到系統(tǒng)的數據庫中，外界便可以通過系統(tǒng)來查詢它的所有信息，售票員可以出售該列車的車票。刪除列車，系統(tǒng)管理員將一列新的列車的全部信息從系統(tǒng)的數據庫中刪除，外界將無法通過系統(tǒng)來查詢它的所有信息，售票員不能夠再出售該列車的

14、車票?；疖嚻钡奶畛涫窍到y(tǒng)管理員向系統(tǒng)的數據庫中添加新的車票。新的車票添加到數據庫中后，售票員可以出售這些新添入的車票。需要添加該列車的車票?；疖嚻钡膭h除是系統(tǒng)管理員將過期的車票或者是系統(tǒng)中已經不存在的列車的車票刪除。比如當日已經發(fā)出的列車的車票車站已經停運的列車的車票都屬于過期的車票。這樣的車票不能再出售，所以要從系統(tǒng)的數據庫中將它們刪除。2.2.6售票員的管理售票員的管理包括增加售票員，網點售票員的注冊，刪除車站售票員，刪除網點售票員，售票員修改自己的登錄密碼。增加車站售票員是系統(tǒng)管理員權限內的操作。系統(tǒng)管理員向系統(tǒng)的數據庫中輸入某個新的車站售票員的信息后，該售票員將在系統(tǒng)中具有一個車站售票

15、員所具有的所有權限內的操作。網點售票員注冊是一個未在系統(tǒng)中注冊的網點售票員向系統(tǒng)的數據庫中輸入自己的信息的過程。網點售票員將自己的信息填寫，如注冊的頁面通過驗證后，保存在系統(tǒng)的數據庫中，注冊過的網點售票員將能夠具有一個網點售票員所具有權限。刪除售票員是系統(tǒng)管理員權限內的操作。系統(tǒng)管理員從系統(tǒng)的數據庫中將某個車站售票員的全部信息從系統(tǒng)的數據庫中刪除。該車站售票員將不再具有一個車站售票員的權限。售票員修改自己的登錄密碼是指系統(tǒng)中的售票員能夠修改自己登錄系統(tǒng)時的密碼。第三章 系統(tǒng)需求分析3.1業(yè)務需求3.1.1業(yè)務組織系統(tǒng)結構圖；圖3.1 鐵道部門的組織結構3.1.2業(yè)務定義數據庫連接用戶登錄員工售

16、票子系統(tǒng)售票系統(tǒng)系統(tǒng)用戶管理員子系統(tǒng) 售票員 客 戶 部門主管 系統(tǒng)管理員圖3.2 系統(tǒng)總體用例圖圖3.3 管理員子系統(tǒng)用例圖信息查詢使用數據庫打印車票車票銷售使用數據庫車票退訂售票員圖3.4 售票員工子系統(tǒng)用例圖日常管理打印報表車廂管理查詢統(tǒng)計國際業(yè)務圖3.5 部門主管用例圖系統(tǒng)權限本系統(tǒng)只針對內部員工開放，同時普通員工可以進行信息查詢，密碼的找回及車票的銷售與退訂，不具備對數據的修改、添加權。管理員不僅對員工子系統(tǒng)具有訪問權，而且可以查詢統(tǒng)計信息。信息的查詢由于客戶在購買火車票并不一定知道具體的車次信息，所以查詢分為按班次、目的地查詢，而管理員則可以查詢銷售的數據統(tǒng)計?；疖嚻钡匿N售與退訂當

17、客戶選定好車票時，前臺售票員出售車票，并把車票信息錄入數據庫。當由于特殊原因需要退票時，售票員可以按照公司規(guī)定為客戶退訂車票，并把退訂的車票信息錄入后臺數據庫。信息的修改當列車信息發(fā)生改變或班次停開、增加時，管理員可以及時的在數據庫錄入，以便能及時放映到售票前臺系統(tǒng)。營業(yè)統(tǒng)計給高層提供及時的車票銷售，班次滿客率等信息，為高層及時作出適當的調整。密碼的找回及修改當員工或管理員忘記密碼時，可以通過自己先前設計的密碼問題找回密碼，或當密碼泄密時及時修改登錄密碼。3.1.3業(yè)務流程系統(tǒng)流程圖如下查詢程序訂票程序退票程序火車站網上訂票系統(tǒng)系統(tǒng)數據庫事務相應信息操作反饋圖3.6頂層系統(tǒng)流程輸入所需車次的重

18、要信息查詢程序系統(tǒng)數據庫符合用戶需求的車次信息事務圖3.7車次信息查詢系統(tǒng)流程圖查詢程序系統(tǒng)數據庫符合用戶需求的訂票信息事務輸入查詢條件圖3.8訂單信息查詢系統(tǒng)流程圖售票程序系統(tǒng)數據庫操作反饋事務輸入售票信息圖3.8訂票系統(tǒng)流程圖退票程序系統(tǒng)數據庫操作反饋事務輸入退票信息圖3.9退票系統(tǒng)流程圖3.2功能需求3.2.1功能組成系統(tǒng)從用戶出發(fā)，建立如下功能模塊。火車票售票系統(tǒng)管理員子系統(tǒng)售票員子系統(tǒng)車票銷售營運統(tǒng)計列車信息修改班次滿客率員工添加信息查詢火車票退定按班次查詢按目的地查詢添加新班次刪除取消班次修改班次信息按日統(tǒng)計銷售收入按季度統(tǒng)計銷售收入按年統(tǒng)計銷售收入圖3.9 系統(tǒng)功能模塊圖3.2.

19、2功能邏輯售票系統(tǒng)的數據流程總圖如下客戶p1車票信息查詢數據車票費用售票員車次數據表車次，座位數據p2分類處理票價車票銷售數據圖3.10 售票數據流程圖客戶查詢數據售票員退票規(guī)定車票數據，退票原因p1分類處理應退票價不能退的車票銷售記錄圖3.11 退票數據流程圖部門主管查詢數據系統(tǒng)管理員數據庫要查詢數據p1分類處理報表數據不能查詢的數據信息高層管理分析后的報表數據圖3.12 信息查詢數據流程圖3.3數據需求3.3.1數據關系系統(tǒng)e-r圖圖3.13 系統(tǒng)e-r圖3.3.2數據定義數據存儲描述表3.1 數據存儲描述數據存儲名稱含義說明數據存儲組成員工員工的主要信息員工id，員工名，出生日期，密碼，

20、密碼問題，問題答案，入廠日期，地址車次列車車次的基本信息列車車次，列車類型，始發(fā)站，始發(fā)時間，終點站，到達時間，里程，票價售票客戶所購買車票的相關信息列車車次，列車類型，座位類型，所售票量退票客戶所退車票信息退票車次，退票原因，所退票價數據流描述表3.2 數據流描述數據流編號數據流名稱含義說明數據流來源數據流去向d2-1信息卡客戶購買車票所提供的信息信息客戶要求模塊p2、1售票員處理p2、2d2-2車次單更具客戶要求查詢的相關信息查詢處理模塊p2、1客戶選擇處理模塊p2、3d2-3購票單客戶最終選擇的相關信息處理邏輯描述表3.3 p1處理邏輯描述處理邏輯編號p1處理邏輯名稱退票處理含義說明客戶

21、退票時的操作輸入的數據流所退票的處理系統(tǒng)根據退票信息增加退票記錄輸出的數據流退票單3.3.3系統(tǒng)的數據庫設計表3.4 車站售票員信息字段名稱字段大小數據類型默認值必須字段允許空key中文含義gid10char是否是員工號name10char是否員工姓名sex5char是否員工性別password20char是否登錄密碼表3.5網點售票員信息表字段名稱字段大小數據類型默認值必須字段允許空key中文含義gid10char是否是員工號name10char是否員工的姓名sex5char是否員工的性別cardid20char是否身份證號碼tel20char是否聯(lián)系電話suoshucom30char是否所

22、屬的單位password20char是否員工登錄的密碼表3.6系統(tǒng)管理員信息表字段名稱字段大小數據類型默認值必須字段允許空key中文含義gid10char是否是員工號name10char是否員工姓名sex5char是否員工性別password20char是否登錄密碼表3.7列車總信息表字段名稱字段大小數據類型默認值必須字段允許空key中文含義checi20varchar是否否車次daozhantime20varchar是否到站時間leibie20varchar是否類別kongtiao20varchar是否是否有空調tujingzhan230varchar是否途經到站zhongdianzhan2

23、0varchar是否終點站shifazhan20varchar是否始發(fā)站fachetime20varchar是否始發(fā)車時間yzshu100int是否硬座總數rzshu100int是否軟座總數ywshu100int是否硬臥總數rwshu100int是否軟臥總數表3.8車票信息表字段名稱字段大小數據類型默認值必須字段允許空key中文含義bid255bigint是否是車票的編號checi20char是否車票所屬車次fachedate20char是否發(fā)車日期shifazhan20char是否始發(fā)站chexiangnum20int是否車廂號碼cheweinum20int是否車位號碼leibie20cha

24、r是否類別dengji20char是否等級表3.9單列車信息表字段名稱字段大小數據類型默認值必須字段允許空key中文含義checi20char是否車次tjdaozhan20char是否是途經站leibie20char是否類別zdianzhan20char是否終點站tjfachetime20char是否途經發(fā)車時間tjdztime20char是否途經到站時間fachetime20char是否始發(fā)車時間zdtime20char是否終點時間yzprice20char是否硬座的價格rzprice20char是否軟座的價格ywprice20char是否硬臥的價格rwprice20char是否軟臥的價格l

25、icheng100bigint是否總里程3.3.4數據字典表3.10數據字典名稱：車站售票員表別名：shoupiaoyuan種類：表基于：車站售票員表描述：記錄車站售票員的信息。定義：車站售票員=工號+姓名+性別+登錄密碼 名稱：網點售票員表別名：wshoupiaoyuan種類：表基于：網點售票員表描述：記錄網點售票員的信息。定義：網點售票員=工號+姓名+性別+身份證號+電話+所屬單位+登錄密碼名稱：系統(tǒng)管理員表別名：guanliyuan種類：表基于：系統(tǒng)管理員表描述：記錄系統(tǒng)管理員的信息。定義：系統(tǒng)管理員=工號+姓名+性別+登錄密碼名稱：火車總表別名：trainall種類：表基于：火車總表表

26、描述：記錄列車的常規(guī)信息，這些信息相對來說是靜態(tài)的，不隨時間而改變。定義：管理員=車次+終到時間+類別+空調+途經站+終點站+始發(fā)站+發(fā)車時間+硬座總數+軟座總數+硬臥總數+軟臥總數 名稱：車票表別名：chepiao種類：表基于：車票表描述：記錄車票的信息。定義：車票=車票編號+車次+發(fā)車日期+始發(fā)站+車廂號+車位號+類別+等級名稱：單車信息表別名：train+checi種類：表基于：單車信息表描述：記錄某一列列車的經停站及到各個經停站的票價信息。定義：單車信息=車次+經停站+類別+終點站+途經發(fā)車時間+途徑到站時間+發(fā)車時間+終到時間+硬座價格+軟座價格+硬臥價格+軟臥價格+里程第四章 詳細

27、設計4.1 數據庫詳細設計4.1.1 數據庫環(huán)境配置系統(tǒng)數據庫設計環(huán)境配置說明連接數據庫的主要代碼：class.forname(“sun.jdbc.odbc.jdbcodbcdriver”); connection con;con=drivermanager.getconnection(“jdbc:odbc:mydatasource”,“sa”,“”)； 此處默認數據庫用戶名為“sa”,密碼為空，并采用mydatasource為連接jdbc連接到odbc數據源的名稱。在進行odbc的創(chuàng)建時，需達到與上述信息的一致。數據庫環(huán)境配置安裝sql server 2005。安裝過程如下。選擇“我接受許可

28、條款的條件“，單擊” 下一步“。截圖一創(chuàng)建sql server 2005數據庫dsn。打開“控制面板/管理工具“，單擊”odbc數據源“圖標，打開“odbc數據源管理器”，如下圖所示。截圖二單擊“系統(tǒng)dsn”選項卡，打開系統(tǒng)數據源頁面。單擊”添加“按鈕，打開”創(chuàng)建新數據源“對話框，如下圖所示。截圖三在驅動程序列表中，選擇sql server,然后單擊“完成“按鈕，打開”創(chuàng)建數據源向導“窗口。輸入數據源名稱、說明和服務器，如下圖所示。截圖四單擊“下一步“按鈕，選擇”使用用戶輸入登陸id和密碼的sql server驗證“，然后手動輸入登陸id和密碼。截圖五單擊“下一步“按鈕，打開設置數據庫選項對話

29、框，如下圖所示。截圖六單擊“下一步“按鈕，進入數據源向導的下一個窗口。截圖七單擊“測試數據源“按鈕，可以檢查數據源配置是否成功。4.1.2 表設計及其關系設置 圖20 系統(tǒng) pdm關系圖4.2 界面設計4.2.1歡迎界面系統(tǒng)進入等待頁面所用控件：image1:image；/加載等待頁面4.2.2 首頁管理員和售票員通過此頁面進入系統(tǒng)登錄頁面所用控件： label1: tlabel;/火車票銷售系統(tǒng) label2: tlabel;/管理員id label3: tlabel;/管理員密碼 edit1: tedit;/輸入管理員id edit2: tedit;/輸入管理員密碼 label6: tla

30、bel;/密碼提示 label8: tlabel;/管理員登陸 image1: timage;/歡迎畫面加載 button1: tbutton;/登陸 label4: tlabel;/員工登陸 datasource1: tdatasource;/ adoconnection1: tadoconnection/; adotable1: tadotable;/ edit3: tedit;/輸入員工id label5: tlabel;/員工id label7: tlabel;/員工密碼 edit4: tedit;/輸入員工密碼 label9: tlabel;/密碼提示 button2: tbutto

31、n;/登陸 button3: tbutton;/取消 button4: tbutton;/取消 datasource2: tdatasource;/數據庫及 adoconnection2: tadoconnection;/數據庫連接 adotable2:tadotable;截圖八4.2.3用戶模塊用戶模塊主頁面所用控件： datasource1: tdatasource; pagecontrol1: tpagecontrol; tabsheet1: ttabsheet; tabsheet2: ttabsheet; tabsheet3: ttabsheet; label1: tlabel; la

32、bel2: tlabel; edit1: tedit; edit2: tedit; label3: tlabel; edit3: tedit; button1: tbutton; edit5: tedit; dbgrid1: tdbgrid; adoconnection1: tadoconnection; adotable1: tadotable; groupbox1: tgroupbox; groupbox2: tgroupbox; groupbox3: tgroupbox; label5: tlabel; label6: tlabel; label7: tlabel; edit6: ted

33、it; edit7: tedit; edit8: tedit; label8: tlabel; label9: tlabel; label10: tlabel; edit9: tedit; edit10: tedit; edit11: tedit; label11: tlabel; edit12: tedit; edit13: tedit; edit14: tedit; label12: tlabel; label13: tlabel; button2: tbutton; button3: tbutton; button5: tbutton; groupbox4: tgroupbox; dbg

34、rid2: tdbgrid; button6: tbutton; button7: tbutton; button8: tbutton; button9: tbutton; button10: tbutton; button11: tbutton; label17: tlabel; dbgrid3: tdbgrid; button12: tbutton; button13: tbutton; button14: tbutton; button15: tbutton; adoquery1: tadoquery; datasource2: tdatasource; adoconnection2:

35、tadoconnection; adotable2: tadotable; adoquery2: tadoquery; button16: tbutton; button17: tbutton; button18: tbutton; datasource3: tdatasource; datasource4: tdatasource; datasource5: tdatasource; datasource6: tdatasource; adoconnection3: tadoconnection; adoconnection4: tadoconnection; adoconnection5:

36、 tadoconnection; adoconnection6: tadoconnection; adotable3: tadotable; adotable4: tadotable; adotable5: tadotable; adotable6: tadotable; adotable7: tadotable; button4: tbutton; adoconnection7: tadoconnection; datasource7: tdatasource; adotable8: tadotable; button19: tbutton; edit4: tedit; button20:

37、tbutton;edit15: tedit;第五章 系統(tǒng)代碼實現(xiàn)1.登錄模塊代碼unit unit1;interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs, stdctrls, jpeg, extctrls, db, adodb;type tform1 = class(tform) label1: tlabel; label2: tlabel; label3: tlabel; edit1: tedit; edit2: tedit; label6: tlab

38、el; label8: tlabel; image1: timage; button1: tbutton; label4: tlabel; datasource1: tdatasource; adoconnection1: tadoconnection; adotable1: tadotable; edit3: tedit; label5: tlabel; label7: tlabel; edit4: tedit; label9: tlabel; button2: tbutton; button3: tbutton; button4: tbutton; datasource2: tdataso

39、urce; adoconnection2: tadoconnection; adotable2: tadotable; procedure button1click(sender: tobject); procedure button3click(sender: tobject); procedure button2click(sender: tobject); procedure button4click(sender: tobject); private private declarations public public declarations end;var form1: tform

40、1;implementationuses unit3;$r *.dfmprocedure tform1.button1click(sender: tobject);begin if(edit1.text=)or(edit2.text=) then begin showmessage(id或密碼不能為空!);end;if adotable1.locate(id;password,vararrayof(edit1.text,edit2.text),)thenbeginapplication.createform(tform3,form3); form3.showmodal; form3.free;

41、endelseshowmessage(id或密碼錯誤)end;procedure tform1.button3click(sender: tobject);beginclose;end;procedure tform1.button2click(sender: tobject);begin if(edit3.text=)or(edit4.text=) then begin showmessage(id或密碼不能為空!);end;if adotable2.locate(id;密碼,vararrayof(edit3.text,edit4.text),)thenbeginapplication.cr

42、eateform(tform3,form3); form3.showmodal; form3.free;endelseshowmessage(id或密碼錯誤)end;procedure tform1.button4click(sender: tobject);beginclose;end;end.2.用戶模塊代碼：unit unit3;interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs, comctrls, tabnotbk, db, dbclient,

43、 stdctrls, adodb, grids, dbgrids;type tform3 = class(tform) datasource1: tdatasource; pagecontrol1: tpagecontrol; tabsheet1: ttabsheet; tabsheet2: ttabsheet; tabsheet3: ttabsheet; label1: tlabel; label2: tlabel; edit1: tedit; edit2: tedit; label3: tlabel; edit3: tedit; button1: tbutton; edit5: tedit

44、; dbgrid1: tdbgrid; adoconnection1: tadoconnection; adotable1: tadotable; groupbox1: tgroupbox; groupbox2: tgroupbox; groupbox3: tgroupbox; label5: tlabel; label6: tlabel; label7: tlabel; edit6: tedit; edit7: tedit; edit8: tedit; label8: tlabel; label9: tlabel; label10: tlabel; edit9: tedit; edit10:

45、 tedit; edit11: tedit; label11: tlabel; edit12: tedit; edit13: tedit; edit14: tedit; label12: tlabel; label13: tlabel; button2: tbutton; button3: tbutton; button5: tbutton; groupbox4: tgroupbox; dbgrid2: tdbgrid; button6: tbutton; button7: tbutton; button8: tbutton; button9: tbutton; button10: tbutt

46、on; button11: tbutton; label17: tlabel; dbgrid3: tdbgrid; button12: tbutton; button13: tbutton; button14: tbutton; button15: tbutton; adoquery1: tadoquery; datasource2: tdatasource; adoconnection2: tadoconnection; adotable2: tadotable; adoquery2: tadoquery; button16: tbutton; button17: tbutton; butt

47、on18: tbutton; datasource3: tdatasource; datasource4: tdatasource; datasource5: tdatasource; datasource6: tdatasource; adoconnection3: tadoconnection; adoconnection4: tadoconnection; adoconnection5: tadoconnection; adoconnection6: tadoconnection; adotable3: tadotable; adotable4: tadotable; adotable5: tadotable; adotable6: tadotable; adotable7: tadotable; button4: tbutton; adoconnection7: tadoconnection; datasource7: tdatasource; adotable8: tadotable; button19: tbutton; edit4: tedit; b