使用存储过程获取员工项目分配（IBX 通用教程）

在这一部分中，您将构建一个表单，使用存储过程来查找员工的项目。创建这个表单的过程与您在“审计工资变更”中遵循的步骤非常相似，特别是因为您将再次使用“DmCSDemo” TDataModule。您将添加一些数据库组件，这与“审计工资变更”中的表单不同。

1. 创建表单

首先，向项目中添加另一个 VCL 表单。在项目管理器中，右键单击项目并点击菜单项“添加新建 > VCL 表单”。

调整新表单的属性：

• 将 Caption 设置为“员工项目分配”。
• 将 Name 设置为“FrmQueryProc”。
• 将表单的 Height 改为 370，Width 组件改为 380。
• 将 OldCreateOrder 设置为 true。

保存表单：对于 Delphi，将文件保存为 Frmqrysp.pas。
在此表单中使用 TDataModule：对于 Delphi，在 Frmqrysp.pas 的实现部分开头添加以下行：uses DmCSDemo;

2. 添加数据库组件

添加一个 TDataSource 组件以获取 EMPLOYEE 表的信息。从下拉菜单中将 DataSet 设置为“DmEmployee.EmployeeTable”。请注意，此数据集由“DmCSDemo” TDataModule 提供。将 Name 改为“EmployeeSource”。

添加一个 TIBQuery 以使用 SQL 语句访问数据库表。

• 将 Name 改为“EmployeeProjectsQuery”。
• 从下拉菜单中将 Database 设置为“DmEmployee.EmployeeDatabase”。
• 如果需要，从下拉菜单