【正文】 成績查詢測試主要用于檢測所輸入的所對應(yīng)的系的用戶學(xué)號信息是否能實現(xiàn)查詢。procedure (Sender: TObject)。 ExecSQL。procedure (Sender: TObject)。end。 + Trim((39。提示39。 (39。begin。end。 :=39。39。39。Begin //查詢符合相關(guān)學(xué)號的記錄 。end。end。end。begin hide。)。39。Var user,pass:string。implementationuses dataconn,mainform。Msg，顯示消息的內(nèi)容。系統(tǒng)的維護(hù)用于用戶的維護(hù)及用戶權(quán)限的設(shè)置等。學(xué)生通用成績管理是學(xué)校管理中異常重要的一個環(huán)節(jié)，它的實現(xiàn)關(guān)系到學(xué)校辦學(xué)整體效率的高低，運用通用成績管理系統(tǒng)可以減輕學(xué)院教學(xué)人員的工作量，加快查詢速度，加強管理， 也讓同學(xué)們能在任何時候都能查閱到有關(guān)自己學(xué)科成績有關(guān)的信息，也有利于讓他們充分了解有關(guān)自己在大學(xué)期間所有課程的學(xué)習(xí)情況，提高查詢速度。ADefault，消息對話框首次出現(xiàn)時編輯框中顯示的信息2) InputQuery函數(shù)顯示一個帶有編輯組件的對話框，為用戶提供輸入文本的功能，并判斷用戶是否按下了Ok按鈕。mtError，顯示一個帶有停止符號圖標(biāo)的信息框。begin :=39。 :=39。用戶名或密碼不正確！請重新輸入！39。 。procedure (Sender: TObject)。procedure (Sender: TObject)。procedure (Sender: TObject)。39。 。 39。begin :=39。 //。 if TextIsNull = False then //判斷編輯框文本是否為空 begin With do //判斷用戶名稱是否重復(fù) begin CLose。 (39。begin Result := False。提示39。 With do //刷新表格信息 begin CLose。)then //密碼是否為空 begin Try With do begin CLose。 。procedure (Sender: TObject)。當(dāng)然本系統(tǒng)還存在好些缺點，比如，成績管理系統(tǒng)過于簡單，沒有班級成績統(tǒng)計功能等。賬戶管理測試主要用于檢測所輸入的用戶名和密碼是否符合要求，能否實現(xiàn)密碼修改。,64)。edit439。 end。 end else (39。end。 Except On E: Exception do //產(chǎn)生異常則拋出異常信息 ShowMessage()。Insert into login values(:username,:password)39。Begin //在窗體創(chuàng)建時顯示SQL數(shù)據(jù) 。,MB_OK)。).AsString。 //求出平均成績和總分，分別賦值給edit 。 。procedure (Sender: TObject)。end。 :=39。39。 var Action: TCloseAction)。else 其他語句。(b)輸出語句MessageDlg函數(shù)可以將信息以對話框的形式輸出并顯示。（3） 方便同時查出總成績和平均成績，實現(xiàn)表的統(tǒng)計功能。（2） 通過使用計算機能方便地維護(hù)各信息表。Value，對話框首次出現(xiàn)在編輯框中顯示的字符串，并得到用戶在消息對話框中輸入的字符串。 .... 條件n:語句n。procedure (Sender: TObject。39。39。begin。end。beginhide。begin hide。beginhide。 。平均值39?！⒁?！39。procedure (Sender: TObject)。begin。 (39。 。) then Result := True。 end。 Open。 (39。提示39。測試過程： 進(jìn)入通用成績管理系統(tǒng)，首先輸入正確的用戶和密碼，并選擇正確的操作權(quán)限，用戶可以登錄；然后輸入錯誤的賬號和正確的密碼或者正確的賬號和錯誤的密碼以及錯誤的賬號和錯誤的密碼，都不能登錄，并且輸入三次錯誤，自動退出。做編程需要有耐心，不能浮躁，特別在出現(xiàn)錯誤不能執(zhí)行時，應(yīng)一次次試驗，而不能氣餒，還不行的情況下，應(yīng)仔細(xì)思考與組友商討研究共