Delphi-ADO组件的使用.ppt
《Delphi-ADO组件的使用.ppt》由会员分享,可在线阅读,更多相关《Delphi-ADO组件的使用.ppt(37页珍藏版)》请在得力文库 - 分享文档赚钱的网站上搜索。
1、第第8章章 ADO组件的使用组件的使用 本章主要内容:TADOConnection组件的使用TADOCommand组件的使用TADODataSet组件的使用TADOQuery组件的使用8.1 TADOConnection组件概述 TADOConnection组件用于建立数据库的连接,该连接可被多个数据集所共享。TADOConnection 组件提供的功能:控制数据库的连接控制服务器的注册管理事务为关联的数据集提供数据库连接将SQL命令发送到数据库中从数据库中提取数据8.1.1 TADOConnection 的常用属性的常用属性1.Attributes属性此属性用于设置连接的数据库的自动处理事务
2、的行为,它是TXactAttributes类型的集合,包括两个集合元素。8.1 TADOConnection组件概述(1)xaCommitRetaining 表示提交一个事务后自动开始一个新的事务;(2)xaAbortRetaining 表示回退一个事务的同时将开始一个新的事务。2.CommandTimeout属性命令超时属性,用于设置一个命令执行时所能等待的最大时间值。例如,以下语句将命令执行时间设为120秒。ADOConnection1.CommandTimeout:=120;3.Connected属性标识和数据库的连接是否处于激活状态。4.ConnectionString属性Connec
3、tionString(连接字符串)用于指定数据库的连接信息。8.1 TADOConnection组件概述连接串的标准调用方式为:ADOConnection1.ConnectionString:=Provider=ProviderRef;Remote Server=ServerRef;其中,连接串支持的常用参数见下表。参数说明Provider数据提供者名称,例如:MSDASQL.1Password登录数据库的口令Persist Security Info支持安全登录User ID登录数据库用户名Data Source数据源名称,数据源的设置需要额外的操作。建议使用连接串生成器创建连接字符串。8.
4、1 TADOConnection组件概述5.ConnectOptions属性指定数据库连接是按照同步方式还是异步方式连接。6.ConnectionTimeout属性指定建立连接的最大允许时间。7.CursorLocation属性指定数据库游标是采用客户端模式还是服务器端模式。8.DefaultDatabase属性 表明数据源成功连接后,数据库的路径,这是由数据源自动赋值的。9.IsolationLevel属性指定不同事务之间的相互独立的级别。10.KeepConnection属性指定如果在没有打开数据集的情况下是否仍然保持数据库的连接。8.1 TADOConnection组件概述11.Logi
5、nPrompt属性指定在每次建立连接时是否弹出登录对话框提示用户登录,如果设为False则必须在 ConnectionString中指定登录数据库的用户名和密码。12.Mode属性指定连接对数据库的操作权限。13.InTransactin属性表明TADOConnection组件是否处于处理事务的状态中。14.DataSets属性和DataSetCount属性DataSets属性包含当前使用这个连接组件的数据集的列表。DataSetCount属性表示该连接组件关联的数据集数目。8.1 TADOConnection组件概述8.1.2 TADOConnection 的主要方法的主要方法1.Begin
6、Trans方法开始启动一个新的事务,必须保证数据连接处于激活状态。2.Cancel方法撤消正在建立的到数据库的连接。3.CommitTrans方法向数据库提交一个事务,提交成功后,在事务中对数据库所作的修改则写入数据库中,同时一个事务也结束。4.Execute方法用来执行SQL命令。5.GetProcedureNames方法获取数据库服务器上的存储过程名称。6.GetTableNames方法获取数据库中的数据表名称。8.1 TADOConnection组件概述7.GetFieldNames方法获取当前连接的数据库中某个指定的数据表的所有字段名。8.Open方法打开一个连接。9.Rollback
7、Trans方法撤回一个没有全部执行的事务,事务撤回之后,事务中所作的任何修改都不会写入数据库。10.Close方法关闭一个连接。8.1.3 ADOConnection 的主要事件的主要事件ADOConnection组件的主要事件如表8-4所示。8.1 TADOConnection组件概述事件说明AfterConnect发生在一个连接建立后AfterDisconnect发生在断开连接后BeforeConnect发生在连接建立前BeforeDisconnect发生在断开连接前OnBeginTransComplete发生在开始一个事务时OnCommitTransComplete发生在提交事务成功时O
8、nConnectComplete发生在连接完成时OnDisconnect发生在连接断开时OnExecuteComplete发生在一个命令执行后OnInfoMessage发生在收到数据库的消息OnLogin发生在用户登录数据库的时候OnRollbackTransComplete发生在一个事务撤回之后OnWillConnect发生在发出一个连接数据请求的时候OnWillExecute发生在数据库收到一个 SQL 命令并将要执行的之前表8-4 ADOConnection组件的主要事件8.2 TADOConnection组件的使用 8.2.1 控制服务器的注册控制服务器的注册许多远程数据库服务器包含安
9、全特性以阻止未经授权的访问。通常,这些服务器在允许数据库访问之前要求输入用户名和密码进行注册。1.在ConnectionString中加入用户名和密码。例:procedure TForm1.Button2Click(Sender:TObject);beginadoconnection1.ConnectionString:=Provider=SQLOLEDB.1;Persist Security Info=False;Initial Catalog=pubs;Data Source=qq-1;User ID=sa;password=123456;adoconnection1.Open();end
10、;8.2 TADOConnection组件的使用2.将用户名和密码作为Open方法的参数。例:ADOConnection1.Open(sa,123456);3.使用OnWillConnect事件procedure TForm1.ADOConnection1WillConnect(Connection:TADOConnection;var ConnectionString,UserID,Password:WideString;var ConnectOptions:TConnectOption;var EventStatus:TEventStatus);begin UserID:=sa;passw
11、ord:=123456;end;8.2 TADOConnection组件的使用8.2.2 控制关联的数据集控制关联的数据集可以使用DataSets属性与DataSetCount属性一起遍历当前所有激活的数据集。【例8-1】编写一个程序,通过TADOConnection组件连接到数据库,并调用GetTableNames方法获取数据库中所有表的名称,显示在一个列表框中。用一个TADOTable组件作为数据集,通过双击列表框中的表名来选取要打开的数据表,并用一个TDBGrigd组件显示表中的记录。【实现步骤】(1)新建应用程序(2)定制窗体8.2 TADOConnection组件的使用图8-1 设计
12、窗体界面8.2 TADOConnection组件的使用组件名属 性属 性 值说 明ADOConnection1ConnectionString使用ConnectionString设置对话框设置该属性,连接到数据库dbdemos.mdb。ADOTable1ConnectionADOConnection1指定使用的数据连接组件。DataSource1DataSetADOTable1指定使用的数据集为ADOTable1。DBGrid1DataSourceDataSource1为表格指定数据源。ListBox1Font.size12设定列表框中文字显示大小。Font.NameArial设定列表框中文字
13、显示字体。表8-5 各组件属性设置8.2 TADOConnection组件的使用(3)编写代码(4)运行程序图8-2 程序运行界面 8.3 TADOCommand组件概述 TADOCommand组件主要用于运行一些数据定义语言(DDL)的SQL命令,或者运行一个没有返回结果集的存储过程,对于有返回结果集的SQL语句,则最好使用TADODataSet、TADOQuery或TADOStoredProc组件,尽管 TADOCommand 组件的Execute 方法可以返回一个结果集,但却是通过另一个ADO数据集组件来使用该记录集。8.3.1 ADOCommand的主要属性的主要属性1.Command
14、Text属性指定要执行的SQL命令。CommandText编辑器是专门用来为ADO组件编写SQL 命令的。2.CommandType属性指定要执行的命令的种类。8.3 TADOCommand组件概述选项说明cmdUnknownCommandText中的命令类型是未知的cmdTextCommandText中是一个SQL语句cmdTableCommandText中指定的是一个表的名称cmdStoredProcCommandText中指定的是一个存储过程的名称cmdFileCommandText中指定的是保存数据集的文件名cmdTableDirectCommandText中指定的是表的名称,并返回所
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- Delphi ADO 组件 使用
限制150内