高分求救：DELPHI访问ORACLE数据库？？急

Question

请提供一些DELPHI访问ORACLE的例子！最好是资料全点的，如：一般查询或存储过程（带参数返回结果集），并在相应结果集上作增加，修改，删除

Answer 1

http://www.5axx.com/article/sql/10170.html

Answer 2

你可以用ado连接，和连接sql差不多

Answer 3

例如查询scott下面的emp
1.建包，定义游标类型和过程
create or replace Package pkg_demo
AS
   TYPE EmpCurTyp IS REF CURSOR RETURN emp%ROWTYPE;
   procedure open_emp_cv(emp_cv OUT EmpCurTyp);
END pkg_demo;
2。定义包体
create or replace package body pkg_demo 
AS
procedure open_emp_cv (emp_cv OUT EmpCurTyp) 
IS
BEGIN
   OPEN emp_cv FOR SELECT * FROM emp;
END open_emp_cv;
end pkg_demo;
3。建立ado连接，注意用oracle的provider，连接字符串里包含“PLSQLRSet=1”
ADOConnection1.ConnectionString:='PLSQLRSet=1;Provider=OraOLEDB.Oracle;Password=tiger;Persist Security Info=True;User ID=scott;Data Source=fjddmis;Extended Properties=""';
ADOConnection1.Open;
4。用TADODataset调用存储过程，注意调用格式
ADODataSet1.Connection:=ADOConnection1;
ADODataSet1.CommandText:='{call pkg_demo.open_emp_cv}';
ADODataSet1.CommandType:=cmdText;
ADODataSet1.Open;