2010-08-13 01:13:37
Delphi连接Oracle有很多种方式，但大多要在客户机上安装Oracle那庞大的客户端，比较不方便，使用ODAC控件连接Oracle则免去了这些麻烦。ODAC也是Oracle公司载发的控件。有for Delphi 6--Dephi 2007的版本。
Oracle数据访问组件（ODAC），全称：Oracle Data Access Components，Oracle数据存取组件（ODAC）库为Borland Delphi， C++ Builder以及Kylix提供了一些非可视化的组件，它们用来存取Oracle关系数据库系统，ODAC直接使用Oracle调用接口（OCI）。OCI是一种允许应用程序开发人员使用第三方开发语言存取Oracle数据服务器的过程或函数有及控制所有的SQL语句执行状态的应用程序接口（API）。OCI通过一个动态运行库（ORA*.DLL）提供了一个标准的数据库存取库及函数，以在应用程序中建立连接。也可以使用ODAC的Net选项而无需在客户机上安装Oracle客户端来连接到Oracle。在这种情况下，ODAC公需要TCP/IP协议的支持，从而可以创建真正的、最小的数据库应用程序。
下面是安装步骤（通过修改对应版本下的make.bat文件编译也可以达到如下效果）：
安装环境：ODAC 6.80.0.47 for Delphi 7
编译及安装：在Project Manager对应的bpl上单击右键先Compile再Install
1、打开并编译安装Source\Delphi7\dac70.dpk
2、打开并编译安装Source\Delphi7\dacvcl70.dpk
3、打开并编译安装Source\Delphi7\dcldac70.dpk
4、打开并编译安装Source\Delphi7\odac70.dpk
5、打开并编译安装Source\Delphi7\odacvcl70.dpk
6、打开并编译安装Source\Delphi7\dclodac70.dpk
7、打开并编译安装Source\Delphi7\oraprov70.dpk
8、将C:\Program Files\Borland\BDS\4.0\ODAC\Source和C:\Program Files\Borland\BDS\4.0\ODAC\Source\Delphi10添加到"Search Path"中("C:\Program Files\Borland\BDS\4.0\ODAC\"是我放置ODAC的路径,你要换成你自已的路径,如果你不放置"C:\Program Files\Borland\BDS\4.0\ODAC\Source"则会出现"File not found: 'DBAccess.res'"的错误).
组件介绍：
TOraSession
设定与控制与Oracle数据库的连接。
当User、Password、Server属性设置好以后，你可以通过调用Connect方法或者设定Connected属性为True来建立一个与数据库的连接。
ODAC包含了以下组件：
所有要有数据访问的组件，像TOraQuery、TOraSQL、TOraScript，必须有他们的被赋予一个TOraSession实例的Session属性。
ODAC有两种连接Oracle的方式：在 Client 模式下，使用Oracle Client 软件， 或者在 Direct 模式下，通过 TCP/IP连接，这种方式发布程序的时候不需要客户端安装Oracle Client 软件。
推荐使用Direct模式
方法：在OraSession的Option中选择Direct，连接的服务器写为“IP：端口：全局服务器名”，例如：
OraSession1.Options.Direct:=True
OraSession1.Username:='system';
OraSession1.Password:='888';
OraSession1.Server:='192.168.10.23:1521:MyDataBase';
OraSession1.Connected;
TOraQuery
利用DML SQL语句更新数据库的表。将SQL语句放入SQLInsert，SQLDelete和SQLUpdate属性。
SQLInsert，SQLDelete，SQLUpdate，SQLLock，SQLRefresh属性支持自动绑定参数。要获得操作之前的字段值可以在字段名前加“OLD_”前缀。
如果没有设定SQLInsert，SQLDelete，SQLUpdate属性TOraQuery，TOraQuery会执行只读访问。
TSmartQuery
TSmartQuery是TOraQuery的另一种选择。它通过动态生成SQL语句，提供对记录insert，delete和update的操作。你也可以履行记录的自动阻塞（blocking），他们的修改前检查、提交后刷新。
为了修改TSmartQuery的记录集，在SQL属性中的SELECT语句应该获得更新表的RowID。当KeyFields属性被指定时，TSmartQuery也可被修改。TSmartQuery只能修改一个Oracle的表。所修改的表是UpdatingTable属性中的表或者是在From子句中的第一个表。
为了编辑Dept表中的数据，你可以在SQL属性中写：
SELECT D.*,D.ROWID FROM Scott.Dept D
ODAC包含了以下组件：
TOraSession：控制服务连接；
TOraQuery：执行查询，操作记录集，灵活地更新数据库表；
TSmartQuery：与TOraQuery功能类似，可自动创建Insert、Delete、Update查询，自动锁定及更新记录；
TOraSQL：执行SQL语句，PL/SQL块，存储过程；
TOraPackage：允许执行包中的过程及函数以及变量；
TOraTable：允许不需要使用SQL语句来读取及更新单个表；
TOraStoredProc：执行存储过程和函数，允许编辑游标并可作为参数返回；
TOraNestedTable：控制嵌套表数据；
TOraProvider：提供从客户数据集进行数据及应用更新；
TOraScript：执行SQL及PL/SQL语句；
TOraAlerter：允许在两个会话中传送消息；
TOraLoader：快速装载Oracle数据库；
TOraSQLMonitor：允许监视执行基于ODAC应用程序中的动态SQL语句；
TOraErrorHandler：传送错误信息；
TBDESession：允许将ODAC集成到基于BDE的应用程序中；
TConnectDialog：用来输入用户名，口令及服务名；
TCRDBGrid：增强的TDBGrid，提供可视化的数据过滤及增量查询；
TVirtualTable：数据存储在内存中。