lazarus 访问oracle,lazarus使用zeos控件与oracle的连接配置

lazarus版本1.1，其中zeos控件版本7.0.3，操作系统win7。

用zeos连接firebird非常方便简单，不费任何周折。可能由于我加的索引有问题，向FB插入大约15万记录后，部分操作明显速度下降。8月9日突发奇想，试试在Oracle中速度如何？没想到连接oracle这么复杂，不过今天终于部分成功，小小高兴一把。

通过反复实验，有以下几点需要注意：

1、tnsnames.ora配置文件是必须的。

2、系统环境变量path和TNS_ADMIN要正确设置。

以下是测试连接的代码

with zconn do

begin

disconnect;

User := EditUser.Text;

Password := EditPassWord.Text;

Protocol := cbProtocol.Text;

HostName := EditHost.Text;

Port := StrToInt(EditPort.Text);

Database := EditProjDb.Text;

Connect;

if Connected = true then

begin

ZReadOnlyQuery1.Open;

showmessage('测试连接成功。');

end

else

showmessage('测试连接失败。');

end;