【正文】 同樣設(shè)置ADOTable，Connection屬性為以上設(shè)置的ADOConnection1，在TableName中選擇連接的表名。(3)、使用DBGrid顯示表先Data Access中選擇設(shè)置Data Source的DataSet屬性為ADOTable1。(4)、使用數(shù)據(jù)庫導(dǎo)航器（DBNavigator）在Data Controls中，選擇設(shè)置DBNavigator 的DataSource屬性為Data Source1。示例：學(xué)生信息維護(hù)窗口procedure (Sender: TObject)。procedure (Sender: TObject)。procedure (Sender: TObject)。 procedure (Sender: TObject)。[12]示例：宿舍管理系統(tǒng)綜合查詢窗口個人信息綜合查詢procedure (Sender: TObject)。(39。++39。39。++39。39。)。//根據(jù)輸入的學(xué)生信息，查詢學(xué)生的個人信息end。11信息管理學(xué)士學(xué)位論文begin。select ,Grade,Sname,Ssex,Sdept,Ssp,Cname,Ccredit,Cteacher from Course,SC,Student where = and = and 39。 = 39。39。39。39。 //根據(jù)輸入的學(xué)生信息，查詢學(xué)生的學(xué)習(xí)情況。[8]示例：宿舍管理統(tǒng)計窗口衛(wèi)生情況統(tǒng)計procedure (Sender: TObject)。(39。39。++39。39。39。++39。39。)。[11]end。begin12第四章 數(shù)據(jù)庫功能的實現(xiàn)。select Dele,count(Droom) as 宿舍個數(shù) from Dmanagement where Ddate=39。39。39。 and Dele=39。39。39。 group by Dele39。[11]用水情況統(tǒng)計procedure (Sender: TObject)。(39。39。++39。39。39。++39。39。)。end。begin。select Dback,count(Droom) as 宿舍個數(shù) from Dmanagement where Ddate=39。39。39。 and Dback=39。39。39。 group by Dback39。示例：創(chuàng)建學(xué)生課程報表窗口打印報表代碼procedure (Sender: TObject)。[7]發(fā)布procedure (Sender: TObject)。修改procedure (Sender: TObject)。確定procedure (Sender: TObject)。[3]回答用戶留言procedure (Sender: TObject)。確定發(fā)表答案procedure (Sender: TObject)。刪除回答procedure (Sender: TObject)。更新答案15信息管理學(xué)士學(xué)位論文procedure (Sender: TObject)。關(guān)鍵代碼：上傳待檢修信息procedure (Sender: TObject)。確定上傳信息procedure (Sender: TObject)。[6]16 關(guān)鍵代碼：用戶登錄并自動分配權(quán)限procedure (Sender: TObject)。Name39。Password39。role39。管理員39。 。 endelseif(trim((39。).AsString)=) and(trim((39。).AsString)=) and(trim((39。).AsString)=39。)and ()thenbegin 。 :=false。 :=false。 break。 if then begin showmessage(39。)。end。[11]新用戶用戶注冊procedure (Sender: TObject)。procedure (Sender: TObject)。信息管理學(xué)士學(xué)位論文第五章 系統(tǒng)測試為確保最終軟件系統(tǒng)滿足用戶需求并且遵循系統(tǒng)設(shè)計，以便對出現(xiàn)的系統(tǒng)漏洞進(jìn)行及時彌補，需對最終軟件系統(tǒng)進(jìn)行全面的測試。測試內(nèi)容：注冊新用戶，輸入用戶名“123”，密碼“123”后，點擊“確定”；輸出結(jié)果：系統(tǒng)提示“注冊成功”。測試內(nèi)容：輸入錯誤用戶名“1234”，輸入密碼“123”；輸出結(jié)果：出現(xiàn)錯誤提示框“您輸入的用戶名或密碼有誤，請重試！”。測試內(nèi)容：輸入用戶名“1234”，輸入密碼“123”，未選擇登陸角色；輸出結(jié)果：出現(xiàn)提示框“請確定已選擇的正確的用戶類型！您輸入的用戶名或21第五章 系統(tǒng)測試密碼有誤，請重試！”。添加信息：在課程信息表中，單擊“添加”按鈕，輸入信息“1005 網(wǎng)絡(luò)工程 23信息管理學(xué)士學(xué)位論文3 姚晨 32 11B208”一行信息，點擊“確定”測試結(jié)果：彈出對話框“是否添加“1005 網(wǎng)絡(luò)工程 3 姚晨 32 11B208”信息？”點擊“OK”，彈出對話框“添加成功！” 刪除信息：學(xué)生信息表中，點擊“王小丫”一行記錄，單擊“刪除”鍵；測試結(jié)果：彈出對話框，確認(rèn)是否刪除信息，單擊“OK”鍵，刪除信息，光標(biāo)移至下一個記錄。檢修回答：發(fā)布“已報檢，請準(zhǔn)備3月28日進(jìn)行檢修！”信息。 類型問題嚴(yán)重度預(yù)期結(jié)果實際結(jié)果出錯原因注冊低正常出錯提示框未注冊登錄低正常出錯提示框用戶名或密碼錯誤數(shù)據(jù)維護(hù)低正常提示框要求確認(rèn)數(shù)據(jù)查詢低正常提示框要求確認(rèn)新聞發(fā)布低正常提示框要求確認(rèn)各功能模塊的運行測試顯示，系統(tǒng)能滿足基本的功能需求，對基本錯誤能夠識別并提示，在修改數(shù)據(jù)庫信息時能有效提示信息，具有一定的健壯性。系統(tǒng)分為宿舍生活管理和學(xué)生學(xué)習(xí)管理兩部分，使用對象有教師、輔導(dǎo)員、公寓管理員、學(xué)生，每一部分又按照權(quán)限的不同各分若干專題。Delphi是一個集成開發(fā)環(huán)境（IDE），使用的核心是由傳統(tǒng)Pascal語言發(fā)展而來的Object Pascal，以圖形用戶界面為開發(fā)環(huán)境，透過IDE、VCL工具與編譯器，配合連結(jié)數(shù)據(jù)庫的功能，構(gòu)成一個以面向?qū)ο蟪绦蛟O(shè)計為中心的應(yīng)用程序開發(fā)工具。數(shù)據(jù)庫引擎是Delphi數(shù)據(jù)庫開發(fā)環(huán)境的核心，它由兩種類型的動態(tài)鏈接庫組成：一種用于提供核心服務(wù)，另一種用于連接本地或網(wǎng)絡(luò)數(shù)據(jù)庫。數(shù)據(jù)庫引擎的主要功能是將數(shù)據(jù)庫應(yīng)用程序和物理的數(shù)據(jù)庫分隔開來，在數(shù)據(jù)庫引擎中通過數(shù)據(jù)庫別名(Database Aliases)來標(biāo)識本地或遠(yuǎn)程的數(shù)據(jù)庫，數(shù)據(jù)庫應(yīng)用程序僅需要此數(shù)據(jù)庫別名就可以透明地對數(shù)據(jù)庫進(jìn)行訪問。通過SQL瀏覽器可以對本地或遠(yuǎn)程的數(shù)據(jù)庫進(jìn)行各種SQL查詢操作。在Delphi數(shù)據(jù)庫應(yīng)用程序開發(fā)環(huán)境的支持下，系統(tǒng)實現(xiàn)了查詢、錄入、修改、刪除等基本數(shù)據(jù)維護(hù)、查看打印報表、管理員發(fā)布通知、學(xué)生上報信息、管理員和用戶的互動、教師成績管理等常用功能，經(jīng)系統(tǒng)測試，能基本達(dá)到使用要求。我正在做系統(tǒng)的過程中遇到了很多問題，有的是知識存儲不足，有的是考慮不夠周全，之所以能夠順利實現(xiàn)基本功功能，離不開老師和同學(xué)的大力相助。開發(fā)一套系統(tǒng)，最重要的是細(xì)心，并不是一定要做到面面俱到，但也要充分考慮到客戶的需求和現(xiàn)實意義，不管什么系統(tǒng)，只用運用到實際應(yīng)用中，才具有現(xiàn)實意義。我們不可能做到面面俱到，但一定要做到步步扎實，作為一個程序編程人員，要保持清醒的頭腦，以現(xiàn)實為依據(jù)，讓自己的每一行代碼都能實現(xiàn)自己的意義。29第七章 謝辭第七章 謝辭本設(shè)計在龍老師的悉心指導(dǎo)和嚴(yán)格要求下業(yè)已完成，從課題選擇、方案論證到具體設(shè)計和調(diào)試，無不凝聚著老師的心血和汗水，在兩年多的雙學(xué)位學(xué)習(xí)和生活期間，也始終感受著導(dǎo)師的精心指導(dǎo)和無私的關(guān)懷，我受益匪淺。不積跬步何以至千里，本設(shè)計能夠順利的完成，也歸功于各位任課老師的認(rèn)真負(fù)責(zé)，使我能夠很好的掌握和運用專業(yè)知識，并在設(shè)計中得以體現(xiàn)。雖然我的論文作品不是很成熟，還有很多不足之處，但我可以自豪的說，這里面的每一段代碼，都是我的勞動。我相信其中的酸甜苦辣最終都會化為甜美的甘泉。希望這次的經(jīng)歷能讓我在以后學(xué)習(xí)中不斷激勵我進(jìn)步。
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ExtCtrls