UniDAC55在DelphiXE7中的使用说明

本文参考了各路大神文章，在这里表示感谢，项目要求连接oracle数据库，不安装oracle客户端，同时支持32位和64位应用程序，试验多次整理而成。

1、执行$\UniDAC55src\Source\Delphi21\Make.bat。 2、完成后在目录$\UniDAC55src\Bin\Delphi21\Win64\和$\UniDAC55src\Bin\Delphi21\Win32\中生成bpl。

2、把$\UniDAC55src\Bin\Delphi21\Win32\目录下*.bpl
复制到c:\Users\Public\Documents\Embarcadero\Studio\15.0\Bpl\下。

3、把$\UniDAC55src\Source和$\UniDAC55src\Source\UniProviders\Oracle目录添加到delphi的library Path,
操作路径为:tools->options->environment options->Delphi options->library,在library path中输入。

4、打开Delphi XE7，
Component->Install Packages
安装c:\Users\Public\Documents\Embarcadero\Studio\15.0\Bpl\dclunidac210.bpl。

6、规划工程文件路径，建立pas、dcu、thirdparty_unidac\dcu，工程选项设置如下：

64位平台同样的设置，对于工程中新增的单元文件保存到pas目录中。

7、编译需要添加$\UniDAC55src\Lib\Delphi21\Win32\如下dcu
到工程目录thirdparty_unidac\dcu下，
OraCallUni.dcu
OraClassesUni.dcu
OracleUniProvider.dcu
OraConnectionPoolUni.dcu
OraConnectionStringUni.dcu
OraConstsUni.dcu
OraDataTypeMapUni.dcu
OraDateTimeUni.dcu
OraErrorUni.dcu
OraIntervalUni.dcu
OraNumberUni.dcu
OraObjectsUni.dcu
OraParserUni.dcu
OraScriptProcessorUni.dcu
OraServicesUni.dcu
OraSQLGeneratorUni.dcu

7、当编译32位程序时，拷贝$\UniDAC55src\Lib\Delphi21\Win32\OraNetUni.dcu到工程目录下， 当编译64位程序时，拷贝$\UniDAC55src\Lib\Delphi21\Win64\OraNetUni.dcu到工程目录下。
选择不同的64bit目标平台添加命令：
copy ..\doc\oranet\x64\oranetuni.dcu .\thirdparty_unidac\dcuoranetuni.dcu到project options->build events->pre-build events->commands

选择不同的32bit目标平台添加命令：
copy ..\doc\oranet\x86\oranetuni.dcu .\thirdparty_unidac\dcuoranetuni.dcu到
project options->build events->pre-build events->commands

8、新建vcl工程，打开窗口，在tool palette最下面找到UniDAC Providers打开，
加入TOracleUniProvider控件，打开UniDAC，加入TUniconnection，双击控件设置provider为oracle，设置options->Direct=true。
测试代码：
UniConnection1.SpecificOptions.Values[‘ConnectionTimeOut’] := ‘3’;
UniConnection1.server := ‘192.168.37.130:1521:orcl’;
UniConnection1.username := ‘hello’;
UniConnection1.password := ‘hello’;
try
UniConnection1.Connect;
ShowMessage(‘ok’);
except
on e: exception do
begin
ShowMessage(e.message);
end;
end;