通過Delphi訪問Oracle資料庫

文章目錄

• 一.開始前的準備
• 二.Delphi使用BDE訪問Oracle資料庫
• 三.添加與維護Oracle ODBC 資料來源
• 四.利用Delphi開發管理Oracle資料庫的執行個體

通過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方面的書！