完成下列要求：
（1）自定义一个过程类型TGetPropProc，该类型有一个参数Prop，类型为IProperty。
（2）定义一个类TPropertyEditor，该类有一个过程GetProperties，该过程有一个参数，参数类型为TgetPropProc，请写出有关代码。
（3）在Uses中写出所使用的单元。

下图是本程序的设计界面（左）和运行界面（右）：

在form1上建立的对象有：Edit1~Edit4、Button1（输出）、RadioGroup1。
该程序的功能是：用户在Edit1~Edit3中分别输入3个整数，并指定输出最大或最小数，然后按“输出”键，输入数据中的最大或最小数将显示在Edit4中。
请编写单击“输出”按钮的事件处理程序。

本程序实现一个简单的选课界面。设计界面和运行界面如下图所示：

该程序涉及到数据库中的两张表：course（课程表）和sc（选课表），表结构如下：
sc（sno学号，cno课程号，grade成绩）
course（cno课号，cname课名，quota名额）
其中：sno和cno都是字符型。
在用户界面，操作员选中一门书、输入学号后，按“选课”键，完成选课功能，即在sc表中插入一条选课记录，并将course表中该课程的名额减1。
该界面要实现以下合法性检查：
当该学生已经选过此课，不能再选。
当所选课程名额已为0，不能再选。
在Form1上建立的数据库组件对象及连接关系如下：
Database1－Table1（与course表相连）－DataSource1－DBGrid1（显示课程信息）
Database1－Table2（与sc表相连，用于插入选课记录）
Database1－Query1
其中为Table1建立了3个永久字段：Table1cno（课程号）、Table1cname（课程名）、Table1quota（名额）。
Query1的SQL语句如下：

下面是Unit1的代码实现部分，请完成程序填空：

本程序的功能是对books表（图书信息）进行浏览，设计界面和运行界面如下图所示。其中，“在借册数”是根据当前显示的书号和borrow表（借书记录）的数据动态计算得到的。用户还可以输入指定书号，查找并定位到指定的记录。

在form1上建立的主要对象有：
Database1、Table1、Query1、DataSource1、DBEdit1~DBEdit3
Edit1~Edit2、Button1~Button3等
其中Database1与mydb数据库相连，Table1对象与books表相连，DBEdit1、DBEdit2、DBEdit3分别和bno（书号）、bname（书名）、author（作者）各列相连。
Query1的SQL语句是：

下面是Unit1单元的代码实现部分，请完成程序填空。