begin MediaPlayer1..④) end; procedure TForm1.Button3Click(Sender:TObject);/ begin MediaPlayer1.Pause end; procedure TForm1.Button4Click(Sender:TObject); /退出 begin if⑤ =mrYes then close; end; end. 3.(10分，每空2分) 本程序实现一个简单的借书界面。程序的设计界面和运行界面如下图所示： 图中信息 图书信息： 串号压名现有研数】 书号名现有册数 烟001数据挖拇原理 2 001数据挖增原理 2 002 知识江程和知识管理 002 知识工程和如识管理 003面向对录款件开发原理 面向对象软件开发原理 00 特征驱动开发方法原理与实 004特在驱动开龙方法原理与列 借书证将 把dit1 指书 借书证r01 借$ 该程序涉及到数据库中的两张表：books(图书信息)和borrow(借书记录)。表的结构为： books(bno,书号，bname书名，num现有册数) borrow(rno读者号，bno书号，rdate还书日期) 其中，rno和bno都是字符型(3位). 在用户界面，操作员选中一本书、输入借书证号后，按“借书”键完成借书功能，即在borrow表中 插入一条借书记录，并将books表中该书现有册数诚1。 该界面要实现以下合法性检查： ·当该读者已经借了此书，不能再借。 当所借的书现有册数为0，不能再借。 在Form1上建立的数据库组件对象及连接关系如下： Databasel-Tablel(与books表相连)-DataSourcel-DBGridl(显示图书信息) Databasel一Table22(与borrow表相连，用于插入借书记录) 1455begin MediaPlayer1. end; procedure TForml. Button3Click(Sender: TObject); / /暂停 begin l. Pause; end; procedure TForml. Button4Click(Sender: TObject) ; / /退出 begin if close; end; end. = mrYes then 3. (1 本程序实现一个简单的借书界面。程序的设计界面和运行界面如下图所示: 该程序涉及到数据库中的两张表: books( 和borrow( books(bno ，bname ，num borrow(rno 读者 ，bno rdate 其中， o和 都是 3位)。 在用户界面，操作员选中一本书、输入借书证号后，按"借书"键完成借书功能，即在 bo w表中 插人一条借书记录，并将 boo s表中该书现有册数减 该界面要实现以下合法性检查: 当该读者已经借了此书，不能再借。 当所借的书现有册数为 0，不能再借。 1上建立的数据库组件对象及连接关系如下: Database1 一Table1 (与 bo 表相 - DataSource1-DBGrid1(显示图书信息) Database1 一TableZ( 与borrow 用 于插入借 1455