【正文】 if 0 then ShowMessage(39。 scope fthnirj.(2)uld:m,qay3bkw4x56v1g16 begin 。)。)。 + 39。 {:=39。name39。 。 end。 。 。 。insert into 借出信息 (圖書(shū)編號(hào) ,借書(shū)證號(hào) ,借出日期 ,借出狀態(tài) )values(:BookID,39。).Value:=trim(editre)。 strSql := 39。 。39。39。 其他相關(guān)實(shí)現(xiàn)代碼： procedure (Sender: TObject。 := 39。 := true。select * from 圖書(shū)明細(xì)表 where 圖書(shū)編號(hào) =:id39。 Exit。select * from 學(xué)生信息表 where 借書(shū)證號(hào) =:id39。 end else Result := true。 Exit。 (39。 。 := 。 Result := [0].Value。 BookID: string。借書(shū)證號(hào)不能為空！ 39。圖書(shū)編號(hào)不能為空！ 39。39。39。39。還書(shū)成功 !39。在庫(kù) 39。此書(shū)已還過(guò) !39。)。 + + 39。 procedure (Sender: TObject。 + + 39。 借 出 日 期39。 function (BookID: string): boolean。ID39。 確定按鈕代碼： procedure (Sender: TObject)。 end。 end。 end。 end。 end。 end。 end。).Value := 。39。39。39。 := 39。).Value := Trim()。author39。 (39。39。39。 確定按鈕代碼： procedure (Sender: TObject)。 end。 end。 scope fthnirj.(2)uld:m,qay3bkw4x56v1g26 end。).Value := 。 end。 end。 end。 end。).Value := 。 end。 (39。).Value := 。jszh39。讀者已添加，還要繼續(xù)添加嗎？ 39。39。39。39。39。39。 。mm39。 if then begin ShowMessage(39。 (39。).Value := Trim()。)。39。39。39。39。39。39。 {。name39。 (39。).Value := trim()。39。 end。).AsString := 。借書(shū)證號(hào) 39。)。 (39。 := true。 := 39。 。mm39。 scope fthnirj.(2)uld:m,qay3bkw4x56v1g32 if then begin ShowMessage(39。 (39。).Value := Trim()。)。 := false。39。39。 end。 參考文獻(xiàn) 1. 《 Visual C++ . 2020 程序設(shè)計(jì) 》 何煒等 冶金工業(yè)出版社 P247261 2. 《數(shù)據(jù)庫(kù)系統(tǒng)概論（第三版）》 薩師煊等 高等教育出版社 3. 《 Windows 用戶界面開(kāi)發(fā)》 [美 ] Everett N. McKay 著 北京大學(xué)出 版社 4. 常州 VC 編程網(wǎng) 用 Visual C++開(kāi)發(fā)數(shù)據(jù)庫(kù)應(yīng)用程序 5. Microsoft MSDN 關(guān)于 MFC ODBC 部分的文檔 scope fthnirj.(2)uld:m,qay3bkw4x56v1g34 附錄 課程設(shè)計(jì)評(píng)分表 課程名稱： 數(shù)據(jù)庫(kù)原理 項(xiàng) 目 評(píng) 價(jià) 設(shè)計(jì)方案的合理性與創(chuàng)造性 設(shè)計(jì)與調(diào)試結(jié)果 設(shè)計(jì)說(shuō)明書(shū)的質(zhì)量 答辯陳述與回答問(wèn)題情況 課程設(shè)計(jì)周表現(xiàn)情況 綜合成績(jī) 教師簽名： 日 期： 。 。借書(shū)證號(hào) =39。39。 查詢按鈕代碼： procedure (Sender: TObject)。 except ShowMessage(39。 (39。 with do begin Close。 Exit。).Value := Trim()。 修改按鈕代碼： procedure (Sender: TObject)。用戶名或密碼錯(cuò)誤，請(qǐng)重新輸入 !39。 Open。select * from 學(xué)生信息表 where 學(xué)號(hào) =:username and 密碼=:pass 39。 ShowMessage(39。).AsString := 。 (39。39。39。 (39。xb39。values(:name,:xh,:depart,:phone,:jszh,:xb)39。 abort。 end。 end。 end。 end。 end。 確定按鈕代碼： procedure (Sender: TObject)。 except scope fthnirj.(2)uld:m,qay3bkw4x56v1g29 ShowMessage(39。 (39。 with do begin Close。 Exit。).Value := Trim()。 end。 end。 end。 end。 提交修改按鈕代碼： procedure (Sender: TObject)。39。 。).Value := Trim()。 (39。 + 39。39。 (39。 。 。 。39。 (39。 。 。 。 end。39。入庫(kù)完畢，還有要入庫(kù)的書(shū) 籍嗎？ 39。time39。).Value := trim()。 (39。 end。 end。39。39。 (39。 。 。 。 。 。 。 。 scope fthnirj.(2)uld:m,qay3bkw4x56v1g23 end else Result := true。)。 end。 := true。39。 end。39。 begin if Key = 13 then begin scope fthnirj.(2)uld:m,qay3bkw4x56v1g22 if ViewBook() = false then begin ShowMessage(39。 。update 圖書(shū)明細(xì)表 set 狀態(tài) =39。 。 and 借書(shū)證號(hào) =39。update 借出信息 set 借出狀態(tài) =0 ,還書(shū)日期 =39。 BookID := Trim()。39。39。 歸還按鈕代碼 ： procedure (Sender: TObject)。).Value := BookID。 var Query2: TADOQuery。 。 begin try scope fthnirj.(2)uld:m,qay3bkw4x56v1g20 Query2 := (self)。沒(méi)有此用戶 , 請(qǐng)重新選擇！ 39。 if = 0 then begin Result := false。 := 。 if = 0 then begin Result := false。 := 。39。 end。 end。39。39。 + strBookID。 //更新圖書(shū)信息表在庫(kù)標(biāo)志 。 (39。 。 Exit。圖書(shū)編號(hào)不能為空！ 39。借書(shū)證號(hào)不能為空！ 39。確定 39。select * from 圖書(shū)類(lèi)別 39。).Value:=trim(edtTypeI)。name39。 := 39。 then begin ShowMessage(39。 then begin ShowMessage(39。 end。 。 strSql := 39。 end。 end。39。39。 := false。 。姓名 =39。39。 procedure (Sender: TObject)。 procedure (Sender: TObject)。 begin 。 end。用戶名、密碼錯(cuò)誤或您不是管理員，請(qǐng)重新輸入 !39。pass39。 。 procedure (Sender: TObject。 procedure (Sender: TObject)。確定要退出本系統(tǒng)嗎 ?39。大家好 39。 begin 。 ，如修改密碼、登錄系統(tǒng)、退出登錄，還有系統(tǒng)簡(jiǎn)介等功能。 系統(tǒng)管理：其功能是為系統(tǒng)的使用者進(jìn)行帳戶和密碼管理以及基礎(chǔ)數(shù)據(jù)維護(hù)。 3．借閱管理部分：這一部分包括借書(shū)信息管理和還書(shū)信息管理兩部分。 ⑵ 課程設(shè)計(jì)內(nèi)容中要求的設(shè)計(jì)結(jié)果。一般來(lái)說(shuō)，選擇課題應(yīng)以在規(guī)定的時(shí)間內(nèi)能完成，并能得到應(yīng)有的鍛煉為原則。 ● 關(guān)系模式的規(guī)范化處理。運(yùn)用 ER 方法，設(shè)計(jì)出系統(tǒng)的各個(gè)局部 ER 模型。實(shí)踐中這是一個(gè)需要與用戶不斷交流才能逐步確定的需求。本階段應(yīng)該對(duì)整個(gè)應(yīng)用情況作全面的、詳細(xì)的調(diào)查，確定特定數(shù)據(jù)庫(kù)應(yīng)用環(huán)境下的設(shè)計(jì)目標(biāo)，收集該應(yīng)用環(huán)境下針對(duì)系統(tǒng)設(shè)計(jì)所需要的基礎(chǔ)數(shù)據(jù)以及對(duì)這些數(shù)據(jù)的具體存儲(chǔ)要求，從而確定用戶的需求。 ⒈ 系統(tǒng)需求分析 需求分析是數(shù)據(jù)庫(kù)系統(tǒng)設(shè)計(jì)的一個(gè)重要的環(huán)節(jié)。 ⑶ 安全性和完整性功能。設(shè)計(jì)局部概念模式。將概念設(shè)計(jì)階段產(chǎn)生的全局概念模式（ ER 圖）轉(zhuǎn)換成初始的關(guān)系模式。各課題的難易度有一定的差異，因此，參加課程設(shè)計(jì)的學(xué)生首先要了解設(shè)計(jì)的任務(wù)，仔細(xì)閱讀