通过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 FilesBorlandDelphi6；
- 开始->程序->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方面的书！
