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