本程序?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)選過此課，不能再選。
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)完成程序填空：