我寫了一個storedprocedure去select某個table的所有資料,然後使用TStoredProc元件指向它,再用一個datasource元件指向TStoredProc元件,dbgrid指向datasource但卻不行??? Stored Procedure的code如下: create or replace procedure ankin(temp out ankin_cur%rowtype) as cursor ankin_cur is select em_empname From treemp; begin open cursor; end ankin; 在一個Button的click event寫如下: StoredProc1.prepare; StoredProc1.open; 其實我的用意是即然TStoredProc是個TDataSet元件,那代表是不是可以比照Table元件的用法。 請回答此篇的先進能否舉個自己用過的範例,謝謝!

Using Oracle Reference Cursor Type ,PL/SQL as following:

-- Type declaration
create or replace package mickpkg as
  type cur is ref cursor;
end;
/    -- Using Function
create or replace function FOpenQry(S varchar2) return mickpkg.cur as
cc mickpkg.cur;
begin
   open cc for S;
   return cc;
end;
/    -- Using Procedure
create or replace procedure POpenQry(S in varchar2,cc out mickpkg.cur) as
begin
   open cc for S;
end;
/

Delphi Sample Code :
-- using function
  with StoredProc1 do begin
    StoredProcName := 'FOPENQRY';
    Params.ParamByName('Result').DataType := ftCursor;
    Params.ParamByName('S').AsString := 'select * from test';
    Prepare;
    Open;
  end;    -- using procedure :
  with StoredProc2 do begin
    StoredProcName := 'POPENQRY';
    Params.ParamByName('cc').DataType := ftCursor;
    Params.ParamByName('S').AsString := 'select * from test';
    Prepare;
    Open;
  end;