下圖是本程序的設(shè)計(jì)界面(左)和運(yùn)行界面(右): 在form1上建立的對(duì)象有:Edit1~Edit4、Button1(輸出)、RadioGroup1。 該程序的功能是:用戶在Edit1~Edit3中分別輸入3個(gè)整數(shù),并指定輸出最大或最小數(shù),然后按“輸出”鍵,輸入數(shù)據(jù)中的最大或最小數(shù)將顯示在Edit4中。 請(qǐng)編寫單擊“輸出”按鈕的事件處理程序。
本程序?qū)崿F(xiàn)一個(gè)簡單的選課界面。設(shè)計(jì)界面和運(yùn)行界面如下圖所示: 該程序涉及到數(shù)據(jù)庫中的兩張表:course(課程表)和sc(選課表),表結(jié)構(gòu)如下: sc(sno學(xué)號(hào),cno課程號(hào),grade成績) course(cno課號(hào),cname課名,quota名額) 其中:sno和cno都是字符型。 在用戶界面,操作員選中一門書、輸入學(xué)號(hào)后,按“選課”鍵,完成選課功能,即在sc表中插入一條選課記錄,并將course表中該課程的名額減1。 該界面要實(shí)現(xiàn)以下合法性檢查: 當(dāng)該學(xué)生已經(jīng)選過此課,不能再選。 當(dāng)所選課程名額已為0,不能再選。 在Form1上建立的數(shù)據(jù)庫組件對(duì)象及連接關(guān)系如下: Database1-Table1(與course表相連)-DataSource1-DBGrid1(顯示課程信息) Database1-Table2(與sc表相連,用于插入選課記錄) Database1-Query1 其中為Table1建立了3個(gè)永久字段:Table1cno(課程號(hào))、Table1cname(課程名)、Table1quota(名額)。 Query1的SQL語句如下: 下面是Unit1的代碼實(shí)現(xiàn)部分,請(qǐng)完成程序填空:
本程序的功能是對(duì)books表(圖書信息)進(jìn)行瀏覽,設(shè)計(jì)界面和運(yùn)行界面如下圖所示。其中,“在借冊(cè)數(shù)”是根據(jù)當(dāng)前顯示的書號(hào)和borrow表(借書記錄)的數(shù)據(jù)動(dòng)態(tài)計(jì)算得到的。用戶還可以輸入指定書號(hào),查找并定位到指定的記錄。 在form1上建立的主要對(duì)象有: Database1、Table1、Query1、DataSource1、DBEdit1~DBEdit3 Edit1~Edit2、Button1~Button3等 其中Database1與mydb數(shù)據(jù)庫相連,Table1對(duì)象與books表相連,DBEdit1、DBEdit2、DBEdit3分別和bno(書號(hào))、bname(書名)、author(作者)各列相連。 Query1的SQL語句是: 下面是Unit1單元的代碼實(shí)現(xiàn)部分,請(qǐng)完成程序填空。