firedac执行存储过程

firedac执行存储过程

  sp.close;
  sp.Unprepare;
  sp.Params.Clear;
  sp.StoredProcName := 'gettables';
  sp.Active:=true;
  Caption := sp.ParamByName('@sum').AsString;