Delphi-ADO组件的使用.ppt

第8章ADO组件的使用 本章主要内容 TADOConnection组件的使用TADOCommand组件的使用TADODataSet组件的使用TADOQuery组件的使用 8 1TADOConnection组件概述 TADOConnection组件用于建立数据库的连接 该连接可被多个数据集所共享 TADOConnection组件提供的功能 控制数据库的连接控制服务器的注册管理事务为关联的数据集提供数据库连接将SQL命令发送到数据库中从数据库中提取数据8 1 1TADOConnection的常用属性1 Attributes属性此属性用于设置连接的数据库的自动处理事务的行为 它是TXactAttributes类型的集合 包括两个集合元素 8 1TADOConnection组件概述 1 xaCommitRetaining表示提交一个事务后自动开始一个新的事务 2 xaAbortRetaining表示回退一个事务的同时将开始一个新的事务 2 CommandTimeout属性命令超时属性 用于设置一个命令执行时所能等待的最大时间值 例如 以下语句将命令执行时间设为120秒 ADOConnection1 CommandTimeout 120 3 Connected属性标识和数据库的连接是否处于激活状态 4 ConnectionString属性ConnectionString 连接字符串 用于指定数据库的连接信息 8 1TADOConnection组件概述 连接串的标准调用方式为 ADOConnection1 ConnectionString Provider ProviderRef RemoteServer ServerRef 其中 连接串支持的常用参数见下表 建议使用连接串生成器创建连接字符串 8 1TADOConnection组件概述 5 ConnectOptions属性指定数据库连接是按照同步方式还是异步方式连接 6 ConnectionTimeout属性指定建立连接的最大允许时间 7 CursorLocation属性指定数据库游标是采用客户端模式还是服务器端模式 8 DefaultDatabase属性表明数据源成功连接后 数据库的路径 这是由数据源自动赋值的 9 IsolationLevel属性指定不同事务之间的相互独立的级别 10 KeepConnection属性指定如果在没有打开数据集的情况下是否仍然保持数据库的连接 8 1TADOConnection组件概述 11 LoginPrompt属性指定在每次建立连接时是否弹出登录对话框提示用户登录 如果设为False则必须在ConnectionString中指定登录数据库的用户名和密码 12 Mode属性指定连接对数据库的操作权限 13 InTransactin属性表明TADOConnection组件是否处于处理事务的状态中 14 DataSets属性和DataSetCount属性DataSets属性包含当前使用这个连接组件的数据集的列表 DataSetCount属性表示该连接组件关联的数据集数目 8 1TADOConnection组件概述 8 1 2TADOConnection的主要方法1 BeginTrans方法开始启动一个新的事务 必须保证数据连接处于激活状态 2 Cancel方法撤消正在建立的到数据库的连接 3 CommitTrans方法向数据库提交一个事务 提交成功后 在事务中对数据库所作的修改则写入数据库中 同时一个事务也结束 4 Execute方法用来执行SQL命令 5 GetProcedureNames方法获取数据库服务器上的存储过程名称 6 GetTableNames方法获取数据库中的数据表名称 8 1TADOConnection组件概述 7 GetFieldNames方法获取当前连接的数据库中某个指定的数据表的所有字段名 8 Open方法打开一个连接 9 RollbackTrans方法撤回一个没有全部执行的事务 事务撤回之后 事务中所作的任何修改都不会写入数据库 10 Close方法关闭一个连接 8 1 3ADOConnection的主要事件ADOConnection组件的主要事件如表8 4所示 8 1TADOConnection组件概述 表8 4ADOConnection组件的主要事件 8 2TADOConnection组件的使用 8 2 1控制服务器的注册许多远程数据库服务器包含安全特性以阻止未经授权的访问 通常 这些服务器在允许数据库访问之前要求输入用户名和密码进行注册 1 在ConnectionString中加入用户名和密码 例 procedureTForm1 Button2Click Sender TObject beginadoconnection1 ConnectionString Provider SQLOLEDB 1 PersistSecurityInfo False InitialCatalog pubs DataSource qq 1 UserID sa password 123456 adoconnection1 Open end 8 2TADOConnection组件的使用 2 将用户名和密码作为Open方法的参数 例 ADOConnection1 Open sa 123456 3 使用OnWillConnect事件procedureTForm1 ADOConnection1WillConnect Connection TADOConnection varConnectionString UserID Password WideString varConnectOptions TConnectOption varEventStatus TEventStatus beginUserID sa password 123456 end 8 2TADOConnection组件的使用 8 2 2控制关联的数据集可以使用DataSets属性与DataSetCount属性一起遍历当前所有激活的数据集 例8 1 编写一个程序 通过TADOConnection组件连接到数据库dbdemos mdb 并调用GetTableNames方法获取数据库中所有表的名称 显示在一个列表框中 用一个TADOTable组件作为数据集 通过双击列表框中的表名来选取要打开的数据表 并用一个TDBGrigd组件显示表中的记录 实现步骤 1 新建应用程序 2 定制窗体 8 2TADOConnection组件的使用 图8 1设计窗体界面 8 2TADOConnection组件的使用 表8 5各组件属性设置 8 2TADOConnection组件的使用 3 编写代码 4 运行程序 图8 2程序运行界面 8 3TADOCommand组件概述 TADOCommand组件主要用于运行一些数据定义语言 DDL 的SQL命令 或者运行一个没有返回结果集的存储过程 对于有返回结果集的SQL语句 则最好使用TADODataSet TADOQuery或TADOStoredProc组件 尽管TADOCommand组件的Execute方法可以返回一个结果集 但却是通过另一个ADO数据集组件来使用该记录集 8 3 1ADOCommand的主要属性1 CommandText属性指定要执行的SQL命令 CommandText编辑器是专门用来为ADO组件编写SQL命令的 2 CommandType属性指定要执行的命令的种类 8 3TADOCommand组件概述 CommandType的选项及说明 3 Connection属性指定所使用的数据连接组件的名称 即TADOConnection组件的名称 4 ConnectionString属性ConnectionString 连接字符串 用于指定数据库的连接信息 8 3TADOCommand组件概述 5 CammandTimeout属性CammandTimeout属性是一个整型数 指定执行一个命令的最大允许时间 默认值是30秒 在TADOCommand组件通过TADOConnection组件与数据连接的情况下 如果同时两者指定了CammandTimeout属性 则优先考TADOCommand组件中设置的值 6 ExecuteOption属性指定调用Execute方法时的命令特征 7 ParamCheck属性指定在运行时如果SQL命令被改变 是否需要重建TADOCommand组件的参数列表 8 Parameters属性在SQL命令中或在存储过程中需要传递参数的时候才需要设置这个值 并且 在命令类型 CommandType 指定为cmdText或cmdStoredProc时 参数才有效 8 3TADOCommand组件概述 8 3 2TADOCommand的主要方法1 Cancel方法中止一个正在执行的的命令 2 Execute方法执行TADOCommand组件所包含的命令 8 4TADOCommand组件的使用 TADOCommand组件封装了ADO技术中的Command对象 通过它可以在数据库上执行SQL语句 在程序中使用TADOCommand组件 需要完成以下步骤 1 使用Connection属性连接到一个TADOConnetion组件或使用ConnetionString属性直接连接数据库 2 设置CommandType属性 指定CommandText属性中包括命令类型 3 为CommandText属性设置命令文本 可以是SQL语句 表名 存储过程名 4 调用Excute方法执行命令 8 5TADODataSet组件概述 TADODataSet可通过SQL命令从一个数据表或者是多个数据表获取数据集 也可以直接获取整个数据表的数据 它还可以执行存储过程 也可以从磁盘文件获取数据 8 5 1TADODataSet的主要属性1 CommandTextCommandTex属性指定数据集合中所包含的命令 可以是SQL语句 一个表名或者一个存储过程名 常用的调用形式为 withADODataSet1dobeginClose CommandType cmdText CommandText SELECT FROMCustomer Open end 8 5TADODataSet组件概述 2 DataSource设置数据源用来自另一个数据集的字段值去自动填充查询的参数 8 5 2TADODataSet组件的重要方法TADODataSet的方法与前面介绍TADOTable的属性一样 8 6TADODataSet组件的使用 8 6 1TADODataSet组件的数据集类型TADODataSet是一个多用途的数据集 通过设置CommandType和CommandText属性 它可以作为表类型 查询类型 存储过程类型和文件类型的数据集使用 1 表类型数据集作为表类型数据集时 TADODataSet从单一的数据表中获取所有行和列 2 查询类型数据集TADODataSet也可以执行SQL查询命令以获取数据集 使用时需要先设置CommandType属性为cmdText 然后在CommandText属性中设置要执行的SQL命令 3 存储过程类型数据集TADODataSet需要指定所执行的存储过程的名称 8 6TADODataSet组件的使用 4 文件类型数据集使用这种类型数据集 需先设置CommandType属性为cmdFile 然后在CommandText属性中设置要打开的文件名 例8 2 在数据库dbdemos mdb中 表customer存储的是顾客信息 表orders存储的是订单信息 编程实现能方便地通过选定顾客来浏览其订单信息 将TADODataset组件的Parameters属性与DataSource属性配合使用 可以建立主 从关系的数据集 实现步骤 1 建立应用程序 2 定制窗体 8 6TADODataSet组件的使用 图8 4设计窗体界面 8 6TADODataSet组件的使用 表8 7各组件属性设置 8 6TADODataSet组件的使用 8 6TADODataSet组件的使用 3 运行程序 图8 5程序运行界面 8 7TADOQuery组件概述 TADOQuery组件借助于SQL语言的的强大功能访问多个数据表 可以实现数据浏览 修改和删除等操作 而且TADOQuery组件也可以实现参数查询 通常情况下 使用TADOQuery组件是为了从数据集中查询一部分字段或记录 也可以使用INSERT DELETE UPDATE ALTERTABLE等SQL命令实现数据库的更新 插入和删除记录的操作 8 7 1主要属性1 SQL属性SQL属性是TStrings类型的变量 包含了TADOQuery组件要执行的SQL命令 请看下面的例子 8 7TADOQuery组件概述 withADOQuery1dobegin 重新写入SQL的时候必须关闭原来的查询Close SQL Clear 清除原来的SQL命令SQL Add SELECTEmpNo LastName FirstName HireDate 设置新SQL命令SQL Add FROMEmployee pen 执行有返回结果的SQL命令 获得想要的查询结果 end 8 7TADOQuery组件概述 2 Parameters属性Parameters属性中保存了SQL属性中的SQL命令中执行所需的参数 3 RowsAffected属性返回最近一次查询所影响的记录数 8 7 2主要方法1 Open方法Open方法用于执行SQL属性所指定的SQL命令 要返回记录集 2 ExecSQL方法ExecSQL方法用于执行SQL属性所指定的SQL命令 不需要返回返记录集 如Insert Update或Delete等命令 8 8TADOQuery组件的使用 8 8 1执行不需要返回结果的查询通过调用ExecSQL方法 TADOQuery组件可以执行Insert Update或Delete等SQL命令 这些命令执行后不会返回数据集 例8 3 编写应用程序用于修改数据库dbdemos mdb中的表employee中的LastName字段 要求输入员工编号和姓 然后根据员工编号修改相应的记录 实现步骤 1 创建应用程序 2 定制窗体 8 8TADOQuery组件的使用 图8 6设计窗体界面 8 8TADOQuery组件的使用 表8 8各组件属性设置 8 8TADOQuery组件的使用 3 编写代码 4 运行程序 图8 7程序运行界面 8 8TADOQuery组件的使用 8 8 2执行有返回结果的查询通过调用Open方法或设置Active属性为True TADOQuery组件可以执行Select命令和存储过程 并返回结果数据集 TADOQuery组件还可使用参数化查询 不需要修改SQL语句 给定不同的参数值 就可以获得不同的查询结果 本章实训指导 1 掌握TADOConnection组件连接ACCESS数据库和MSSQL数据库服务器的方法 2 掌握TADOCommand组件执行SQL命令方法 3 掌握TADODataset组件的用法 4 掌握TADOQuery组件的用法 5 用TADODataset组件和TADOQuery组件重写通讯录程序 体会在功能实现上与TADOTable组件有何不同