通过Delphi访问Oracle数据库
徐长友
摘要：Delphi在数据库程序设计这一领域有着极其重要的作用。这当然不是因为它的友好开发界面，而是它的强大数据库引擎(Borland Database Engine，简称为BDE) 。本文将通过具体的实例详细介绍如何通过Delphi访问Oracle数据库,及进行数据库的程序设计。
主要内容包括：
配置BDE
认识Oracle ODBC数据源
添加Oracle ODBC数据源
维护Oracle ODBC数据源
Delphi开发管理Oracle数据库的实例
一.开始前的准备
安装 Oracle 8i (8.0.5)使用典型安装，安装目录如 F:\Oracle；
安装 Delphi 6 企业版，把Delphi 6光盘放入光驱，使用典型安装，安装目录为F:\Program Files\Borland\Delphi6；
开始->程序->Oracle for Windows NT->Oracle Net8 Easy Config配置Service Name，如新增一个名为YOUSOFT的Service，具本请参考Oracle书籍。
建立Oracle数据表，Oracle用户：
打开SQL*Plus,以system/manager用户登录
创建新的用户：如yousoft/yousoft，赋予resource，connect权限。建个student表
SQL> grant connect,resource to yousoft identified by yousoft;
SQL> conn yousoft/yousoft
已连接。
SQL> create table student(ID number,name char(20),Englist number(5,2),physics number(5,2));
表已创建。
SQL> insert into student values(1,'徐长友',80,38);
已创建 1 行。
SQL> insert into student values(2,'李四',40,58);
已创建 1 行。
SQL> insert into student values(3,'张三',89,98);
已创建 1 行。
SQL> insert into student values(4,'王五',68,78);
已创建 1 行。
SQL> insert into student values(5,'小孙',88,98);
已创建 1 行。
SQL> insert into student values(6,'老马',59,89);
已创建 1 行。
SQL> commit;
提交完成。
SQL> select * from student;
ID NAME ENGLIST PHYSICS
--------- -------------------- --------- ---------
1 徐长友 80 38
2 李四 40 58
3 张三 89 98
4 王五 68 78
5 小孙 88 98
6 老马 59 89
已选择6行。
二.Delphi使用BDE访问Oracle数据库
配置BDE
开始->程序->Borland Delphi 6->BDE Administrator
配置Drivers，修改上图画红圈的地方，分别是
DLL32：SQLORA8.DLL
VENDOR INIT：OCI.DLL
SQLPASSTHRU MODE： SHARED NOAUTOCOMMIT
修改完，点击工具栏上的apply或按CTRL+A，完成配置后关闭BDE Administrator，接下配置Database Aliases（数据库访问别名），重新打开BDE Administrator新建一个别名，如设为useoracle，接下图：
SERVER NAME下拉选择YOUSOFT.WORLD，点击工具栏上的apply或按CTRL+A，然后双击useoracle，进入连接
输入用户名、口令(如：上面建的yousoft，口令)，按“OK”连接。出现下面表明连接成功！
三.添加与维护Oracle ODBC 数据源
ODBC中文即开放式数据库链接(Open DataBase Connectivity)，实际上是一种数据引擎。通过它所提供的函数，可以访问数据库中的数据。它的优点在于能处理多种类型的数据，如：dBase,FoxPro,Paradox及Oracle等。不同的数据库都有自己的ODBC驱动程序。我们从控制面版中打开ODBC数据源管理器
切换到Drives(驱动程序)选项卡，即可看到已安装的所以ODBC驱动程序，如上图所示。
1.添加ODBC数据源
切换到System DSN选项卡，在此添加一下Oracle数据源，如下图所示
单击Add按钮，出现如下图所示的Create New Data Source对话框。
在列表中选择Microsoft ODBC for Oracle选项，单击完成，为标识数据源，在Data Source Name文本框中输入useoralce2,User Name和Server中分别输入yousoft和yousoft.world，单击OK就可在System DSN选项卡中看到添加的数据源名称。
2.维护Oracle ODBC数据源
一旦建立好ODBC数据源后，还可以通过ODBC数据源管理器方便地对其进行修改,删除。只需选中数据源名称，单击Configure按钮即可修改该项数据源所有的设置。如查要删除选定的数据源，则只需单击Remove按钮。
四.利用Delphi开发管理Oracle数据库的实例
开始->程序->Borland Delphi 6->Delphi 6启动Delphi
然后 File->New->Application新建一应用程序
加入一个DataBase控件，一个Table控件，一个DataSource控件和一个DBGrid控件
各控件属性设置如下：
Name:Oracle_DataBase
AliasName选择useoracle
DatabaseName设置为oradb
LoginPromp设置为False
Params中输入：
USER NAME ：yousoft PASSWORD:yousoft
Connected设置True
一切没问题的话就能正常连接到数据库
Name:Table1
DatabaseName:选择oradb
TableName选择STUDENT
Active设置为Active
DataSet:设置为Table1
将DataSource设置为DataSource1即可
按F9，运行此程序，程序运行如下图：
以上是使用数据库访问别名打开Oracle数据库，再试一下用ODBC打开如何。
很简单，只要修改database控件的AliasName选择我们前面建的Oracle ODBC数据源useoracle2，其它控件属性同上不变。
按F9，运行此程序，程序运行如下图：
对比上面，有什么不同？两个是一样的。
总结：通过上面的学习，你已学到通过Delphi访问和管理Oracle数据库了，但是，这只能算是管中窥豹而已，更多还等待着你去学习。如果上面还有什么不明白的地方请与我联系(我的邮箱：yousoft@chinaren.com 主页：http://yousoft.home.chinaren.com )利用Delphi和Oracle,完全可以创建出功能强大的工程软件。感兴趣的朋友可以参考Delphi数据库编程及Oracle方面的书！
