本程序?qū)崿F(xiàn)一個(gè)簡(jiǎn)單的選課界面。設(shè)計(jì)界面和運(yùn)行界面如下圖所示：
該程序涉及到數(shù)據(jù)庫(kù)中的兩張表：
course（課程表）和sc（選課表），表結(jié)構(gòu)如下：sc（sno學(xué)號(hào)，cno課程號(hào)，grade成績(jī)）course（cno課號(hào)，cname課名，quota名額）
其中：sno和cno都是字符型。
在用戶界面，操作員選中一門書、輸入學(xué)號(hào)后，按“選課”鍵，完成選課功能，即在sc表中插入一條選課記錄，并將course表中該課程的名額減1。
該界面要實(shí)現(xiàn)以下合法性檢查：
1.當(dāng)該學(xué)生已經(jīng)選過(guò)此課，不能再選。
2.當(dāng)所選課程名額已為0，不能再選。
在Form1上建立的數(shù)據(jù)庫(kù)組件對(duì)象及連接關(guān)系如下：
Database1－Table1（與course表相連）－DataSource1－DBGrid1（顯示課程信息）
Database1－Table2（與sc表相連，用于插入選課記錄）
Database1－Query1
其中為Table1建立了3個(gè)永久字段：Table1cno（課程號(hào)）、Table1cname（課程名）、Table1quota（名額）。
Query1的SQL語(yǔ)句如下：
select cno
from sc
where sno =:sno and cno=:cno
下面是Unit1的代碼實(shí)現(xiàn)部分，請(qǐng)完成程序填空：
您可能感興趣的試卷
你可能感興趣的試題
最新試題
列表框（ListBox）組件的用途是什么？
dfm 文件包含有關(guān)窗體及組件的（）等描述信息，程序員一般不必維護(hù)它，而只需了解他就可以了。
Delphi的調(diào)試環(huán)境提供了兩種查看變量?jī)?nèi)容的方法是什么？（）
程序塊可出現(xiàn)在以下幾種場(chǎng)合中（）
一個(gè)表格數(shù)據(jù)感知控件DBGrid對(duì)象不但可以同時(shí)顯示多個(gè)（），而且可以同時(shí)顯示多行數(shù)據(jù)。
（）執(zhí)行可以控制程序逐條執(zhí)行語(yǔ)句，每執(zhí)行完一條語(yǔ)句程序都會(huì)停下來(lái)，等待用戶發(fā)出執(zhí)行下一條語(yǔ)句的命令。
簡(jiǎn)述DBListBox和DBLookupListBox的區(qū)別。
若要結(jié)束當(dāng)前工作并退出Delphi 開發(fā)環(huán)境，可執(zhí)行（）命令。
狀態(tài)條（StatusBar）組件的用途是什么？
開發(fā)人員在編寫代碼的過(guò)程中，總免不了會(huì)出現(xiàn)一些錯(cuò)誤，這些錯(cuò)誤歸納起來(lái)有語(yǔ)法錯(cuò)誤、（）和邏輯錯(cuò)誤。