Delphi连ORACLE问题如何在Delphi中运行Oracle的函数

Question

我需要在delphi中运行oracle的 checkuser函数　checkuser有三个输入参数　一个输出豢数
在delphi中我不知如何来做了　请大家帮忙

Answer 1

在delphi里执行Sql语句的方式调用,并把参数传进去就行了.

Answer 2

//我用的是SQL SERVER,Oracle也差不多。
procedure TForm1.Button1Click(Sender: TObject);
var
  Present: TDate;
begin
  Present := Now;
  with ADOQuery1 do
  begin
    Close;
    SQL.Add('select dbo.GetMonthLastDay('+DateToStr(Present)+') as LastDay');
    ExecSql;
    Open;    ShowMessage(ADOQuery1.fieldbyname('LastDay').asString);
  end;
end;