《Delphi5企业版使用BDE访问Oracle方法》由会员分享,可在线阅读,更多相关《Delphi5企业版使用BDE访问Oracle方法(9页珍藏版)》请在金锄头文库上搜索。
1、Delphi5企业版使用BDE访问Oracle方法系统环境: 1、操作系统:Windows 2000 Server2、数据库:Oracle 8i R2 (8.1.6) for NT 企业版3、开发工具:Delphi 5 企业版连接方法: 一、安装 Oracle 8i R2 (8.1.6) for NT 企业版使用典型安装,安装目录为D:Oracle;二、安装 Delphi 5 企业版把Delphi 5光盘放入光驱,使用典型安装,安装目录为C:Program FilesBorlandDelphi5;三、生成Oracle实验记录连入SQL*Plus,以system/manager用户登录SQL c
2、onn system/manager创建新的用户:如user1/pass1,赋予connect,resource权限。SQL grant connect,resource to user1 identified by pass1;SQL conn user1/pass1SQL create table test(a number,b char(19);SQL insert into test values(1,to_char(sysdate,yyyy-mm-dd hh24:mi:ss);SQL insert into test values(2,to_char(sysdate,yyyy-mm-
3、dd hh24:mi:ss);SQL insert into test values(3,to_char(sysdate,yyyy-mm-dd hh24:mi:ss);SQL insert into test values(4,to_char(sysdate,yyyy-mm-dd hh24:mi:ss);SQL insert into test values(5,to_char(sysdate,yyyy-mm-dd hh24:mi:ss);SQL commit;SQL select * from test; A B- - 1 2000-11-28 20:27:33 2 2000-11-28 2
4、0:27:36 3 2000-11-28 20:27:38 4 2000-11-28 20:27:40 5 2000-11-28 20:27:52D:OracleOra81networkADMINtnsnames.ora中有如下内容:test = (DESCRIPTION = (ADDRESS_LIST = (ADDRESS = (PROTOCOL = TCP)(HOST = hlshang)(PORT = 1521) ) (CONNECT_DATA = (SERVICE_NAME = oradb) ) )总结:Oracle service_names:oradbOracle用户名:user1
5、户名密码:pass1测试表名:testtnsnames:test四、配置BDE开始程序Borland Delphi 5BDE Administrator1、配置Drivers,修改以下几个地方,如下图:DLL32:SQLORA8.DLLVENDOR INIT:OCI.DLLLANGDRIVER: Oracle SQL WE850SQLPASSTHRU MODE: SHARED NOAUTOCOMMIT修改完,按鼠标右键,apply(CTRL+A),提交修改2、配置Database Aliases(数据库访问别名),新建一个别名,起名为oracle,如下图:3、修改以下几个地方,如下图:SERV
6、ER NAME:test修改完,按鼠标右键,apply(CTRL+A),提交修改,退出BDE Administrator重新打开BDE Administrator,用鼠标左键双击别名oracle,进行连接测试输入用户名、密码,按“OK”连接,不能把user1/pass1直接写在User Name上,要分开写如果出现下图,则说明连接成功五、启动 Delphi 5 企业版,写连接 Oracle 的 Delphi 程序开始程序Borland Delphi 5Delphi 5FileNew.Application,如下图:Delphi 开发窗口上方的工具箱面板:打开Data Access控件组,用鼠标
7、双击控件Table,再双击DataSource控件(上图中画红框的两个),把它们放到窗体Form1上,默认名称为Table1和DataSource1:打开Data Controls控件组,用鼠标双击DBGrid控件(上图中画红框的), 把它放到窗体Form1上,默认名称为DBGrid1,如下图:修改控件Table1、DataSource1、DBGrid1的属性,如下图:Table1的Active属性:TrueTable1的DatabaseName属性:oracle(即是选BDE名)Table1的TableName属性:TEST(这里需要连接oracle)DataSource1的DataSet属性:Table1DBGrid的DataSource属性:DataSource1按F9,运行此程序,弹出登录画面,如下图:输入用户名、密码,按“OK”,运行结果如下图: