CSDN博客

img yousoft

通过Delphi访问Oracle数据库

发表于2001/9/4 9:13:00  1004人阅读

分类: 数据库

通过Delphi访问Oracle数据库

徐长友

摘要:Delphi在数据库程序设计这一领域有着极其重要的作用。这当然不是因为它的友好开发界面,而是它的强大数据库引擎(Borland Database Engine,简称为BDE) 。本文将通过具体的实例详细介绍如何通过Delphi访问Oracle数据库,及进行数据库的程序设计。

主要内容包括:

  • 配置BDE
  • 认识Oracle ODBC数据源
  • 添加Oracle ODBC数据源
  • 维护Oracle ODBC数据源
  • Delphi开发管理Oracle数据库的实例

一.开始前的准备

  1. 安装 Oracle 8i (8.0.5) 使用典型安装,安装目录如 F:/Oracle;
  2. 安装 Delphi 6 企业版,把Delphi 6光盘放入光驱,使用典型安装,安装目录为F:/Program Files/Borland/Delphi6;
  3. 开始->程序->Oracle for Windows NT->Oracle Net8 Easy Config配置Service Name,如新增一个名为YOUSOFT的Service,具本请参考Oracle书籍。
  4. 建立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数据库

  1. 配置BDE
    开始->程序->Borland Delphi 6->BDE Administrator
     
  2. 配置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方面的书!

0 0

相关博文

我的热门文章

img
取 消
img