文档介绍:第第16 16讲讲应用系统开发应用系统开发问题问题?问题如何开发一个 MIS 系统? 系统目标系统目标在在 Delphi Delphi 中使用中使用 SQL SQL Server Server 数据库表数据库表??( (1 1)在)在 Delphi Delphi 集成开发环境中通过菜单命令集成开发环境中通过菜单命令【【 File File 】】→→【【 New New 】】→→【【 Application Application 】】建立一个新建立一个新的工程。的工程。??( (2 2)在)在【【 ADO ADO 】】组件页上选择组件页上选择【【 ADOConnection ADOConnection 】】控件控件 ADOConnection1 ADOConnection1 放在表单上。放在表单上。??( (3 3)设置)设置 ADOConnection1 ADOConnection1 的的““ ConnectionString ConnectionString ””属性。如图属性。如图 16-1-1 16-1-1 所示,在属性窗口中单击所示,在属性窗口中单击 ConnectionString ConnectionString 旁的旁的“”“”按钮。按钮。??( (4 4)选中)选中““ Use Connection String Use Connection String ””, ,单击单击““ Build Build ””按按钮。出现图钮。出现图 16-1-2 16-1-2 所示对话框。所示对话框。??( (5 5)选中)选中““ Microsoft OLE DB Provider for SQL Microsoft OLE DB Provider for SQL Server Server ””, ,单击单击““下一步下一步””,出现图,出现图 16-1-3 16-1-3 所示对话框。所示对话框。在在 Delphi Delphi 中使用中使用 SQL Server SQL Server 数据库表数据库表?(6)我们这里使用的是本地数据库。在“选择或输入服务器名称”中输入“(local) ”。?(7)选中“使用指定的用户名称和密码”。?(8)在用户名称中输入“ sa”,密码中输入相应的密码。?(9)选中“允许保存密码”。?(10)在“在服务器上选择数据库”下拉列表中选择数据库“ Xk ”。在在 Delphi Delphi 中使用中使用 SQL SQL Server Server 数据库表数据库表?(11)单击“测试连接”,测试成功后单击“确定”。?(12)单击“确定”按钮,再单击“ OK ”按钮完成数据库连接的设置。?(13)设置 ADOConnection1 的 LoginPrompt ”属性为“ False ”。?(14)在【 ADO 】组件页上选择【 ADOTable 】控件 ADOTable1 放在表单上。设置 ADOTable1 的“ Connection ”属性为“ AdoConnection1 ”, “ TableName ”属性为“ Student ”,“ Active ”属性为“ True ”。?(15)在【 Data Access 】组件页上选择【 DataSource 】控件 DataSource1 放在表单上。设置 DataSource1 的 DataSet 属性为 ADOTable1 。在在 Delphi Delphi 中使用中使用 SQL SQL Server Server 数据库表数据库表?(16)在【 Data Controls 】组件页上选择【 DBGrid 】控件 DBGrid1 放在表单上。设置 DBGrid1 的 DataSource 属性为 DatsSource1 。?(17)在【 Stand 】组件页上选择【 Button 】控件 Button1 放在表单上。设置 Button1 的 Caption 属性为“使用表”。?(18)双击 Button1 按钮,在 OnClick 事件中添加如下代码。 :=True; ?(19)在工具栏上单击“”按钮存盘。?(20)在工具栏上单击“”运行按钮,运行后单击“使用表”按钮,可以看到 Student 表的相关数据。基于基于 SQL Server SQL Server 的动态的动态 WEB WEB 开发实例开发实例?(1)在 Delphi 集成开发环境中通过菜单命令【 File 】→【 Close All 】关闭所有文件。?(2)在 Delphi 集成开发环境中通过菜单命令【 File 】→【 New 】→【 Other 】,选择 ActiveX 页,选中 ActiveX Libr