如何使用ADOQuery调用oracle过程、方法及包里面的过程和方法？有示例，分好多！

[leandzgc]

跪求各位大神，如何使用ADOQuery调用oracle的包里面的过程？包里面的方法？单独的过程，单独的方法？请每样给出一个示例，感激不尽啊！！！跪求解决，分不是问题！都是带输出参数的哦！网上被转疯的那个代码就不要贴了，我已经试验N遍了！

[leandzgc]

怎么一个人也没有啊！！！

[leandzgc]

跪求神仙啊！

[leandzgc]

问题已解决，参照http://shantouyyt.blog.163.com/blog/static/6548147620116910246797/ oracel 函数 create or replace function fun_yyt_test (p1 varchar2,p2 varchar2) return varchar2 is r1 varchar2(50); begin r1 := 'yyt'; return r1; end; 第一种：TADODataSet 查询 这种可能会出现：在查询或DML中无法执行DML，提交或回退。 dspos := TADODataSet.Create(nil); dspos.Connection := g_cnPOS; dspos.CommandText := ' select fun_yyt_test(''1'',''6'') as result from dual ' ;//fun_yyt_test 为oracle 函数 dspos.Open; bill := dspos.FieldByName('result').AsString; showmessage(bill); 第二种：TADOStoredProc proc := TADOStoredProc.Create(nil); proc.Connection := g_cnPOS; proc.ProcedureName := 'fun_yyt_test'; proc.Parameters.CreateParameter('@RETURN_VALUE', ftString, pdReturnValue, 50, Unassigned); proc.Parameters.CreateParameter('p1', ftString, pdInput, 20, 'DJTHTZ001'); proc.Parameters.CreateParameter('p2', ftString, pdInput, 10, '9907'); proc.ExecProc; ShowMessage(proc.Parameters.ParamByName('@RETURN_VALUE').value); 返回值 用@RETURN_VALUE 代替。 虽然不想用adostoreproc来调用，但是这是没有办法的办法了，如果各位大婶有用adoquery成功调用，还请多多指点啊。来人接分吧！