Delphi调用 Oracle 函数

可以 调用query
select funname(v1,v2) as result  from dual
无参的函数就
select funname() as result  from dual

如果用ADOStoredProc组件：
     //输入参数
   dm.ADOStoredProc1.ParamByName('teamORclass').Value :=1;   
       //执行   
   dm.ADOStoredProc1.ExecProc;
      //输出参数
   CHECKCONFLICT:=dm.ADOStoredProc1.Parameters[0].Value ;