數(shù)據(jù)庫課程設(shè)計(jì)(存儲(chǔ)版)
【正文】 組件的消息對(duì)話框，該提示框中有一個(gè)文本輸入框和兩個(gè)命令按鈕，為用戶提供輸入文本的功能。APrompt，消息對(duì)話框的提示信息。Dlgtype,指定消息對(duì)話框的類型。語法：case 條件表達(dá)式 of 條件1:語句1。 {$R *.dfm}procedure (Sender: TObject)。end。 begin user:=Trim()。+user+39。39。 :=39。 。procedure (Sender: TObject)。 。procedure (Sender: TObject。procedure (Sender: TObject)。procedure (Sender: TObject)。procedure (Sender: TObject)。procedure (Sender: TObject)。procedure (Sender: TObject)。 。 39。+Trim()+39。 := (39。39。,39。select 學(xué)號(hào),課程號(hào),成績 from jdxgrade39。 //關(guān)閉當(dāng)前窗體end。procedure (Sender: TObject。procedure (Sender: TObject)。 。password39。,64)。,64)。39。username39。 //產(chǎn)生異常則拋出異常信息 End。procedure (Sender: TObject)。)。var n:string。)。 end。,39。begin。end. 幫助信息 系統(tǒng)名稱：通用成績管理系統(tǒng)測(cè)試環(huán)境：服務(wù)器環(huán)境Microsoft SQL Server、編程軟件環(huán)境Borland Delphi 6測(cè)試系統(tǒng)：windows XP登錄測(cè)試主要用于檢測(cè)系統(tǒng)能否防止非授權(quán)用戶使用系統(tǒng)。測(cè)試過程：進(jìn)入成績查詢界面，首先輸入錯(cuò)誤的學(xué)生學(xué)號(hào)，執(zhí)行查詢，則出現(xiàn)錯(cuò)誤，無法實(shí)現(xiàn)查詢，然后輸入不對(duì)應(yīng)的系的學(xué)生學(xué)號(hào)，執(zhí)行查詢，無法顯示查詢結(jié)果，再次輸入正確的系的學(xué)生學(xué)號(hào)，則查詢成功。這次設(shè)計(jì)讓我深刻的體會(huì)到團(tuán)隊(duì)的力量，還有做什么事都不能馬馬虎虎，需要在思考后再好好實(shí)現(xiàn)。測(cè)試過程：進(jìn)入成績錄入界面，首先不不輸入學(xué)號(hào)或者姓名，則不成功，出現(xiàn)錯(cuò)誤，然后輸入符合條件的信息，則錄入成功。 。end。 (39。).Value := Trim()。 (39。End。 (39。,64)。 。確實(shí)要?jiǎng)h除庫存名稱為: 39。39。,39。,39。).Value := Trim()。 End。 var Action: TCloseAction)。end. 經(jīng)管系成績管理 （代碼同上） 文法系成績管理（代碼同上） 賬戶管理uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DB, ADODB, StdCtrls, Grids, DBGrids, Buttons。 。 // 。 。 if = 0 then //未找到用戶，提示用戶輸入錯(cuò)誤 begin (39。select 學(xué)號(hào),課程號(hào),成績 from jdxgrade where 學(xué)號(hào)=39。求和39。39。39。{$R *.dfm}procedure (Sender: TObject)。 //隱藏當(dāng)前窗體 。begin。procedure (Sender: TObject)。{$R *.dfm}procedure (Sender: TObject)。 end。密碼錯(cuò)誤三次，系統(tǒng)退出！39。^_^注意！39。+pass+39。39。 //定義i 作用是查看用戶是否輸入時(shí)有三次錯(cuò)誤procedure (Sender: TObject)。 :=39。var Formlogin: TFormlogin。（c)條件判斷語句1）使用if...then語句 語法： if 條件 then begin 語句 end。HelpCtx:Longint):Integer。var Value:string):Boolean。3．功能需求分析3．1系統(tǒng)功能的描述經(jīng)過調(diào)研分析，通用成績管理系統(tǒng)共可分為系統(tǒng)對(duì)用戶的添加，刪除，修改，各系成績的錄入，各系成績的分類查詢，查詢學(xué)生的基本信息，選課情況。 成績管理系統(tǒng)是面向各校的管理系統(tǒng)
電大資料相關(guān)推薦
鄂ICP備17016276號(hào)-1