Help? TstoreProc 返回SQL输出参数~~~

delphi 开发:为什么我的  TstoreProc  返回不了SQL输出参数~~~1.用 <SQL查询分析器> 执行存储过程可以返回结果集 和  SQL输出参数:
(所影响的行数为 2 行）存储过程: dck.dbo.Total_FK
返回代码 = 0
输出参数: 
@TotalFiles = 2
@Total_CBfiles = 2
@Total_Zbfiles = 2
@Total_SYfiles = 0
2.但是我在用TstoreProc  控件的时候就不行呢？？？   得不到正确的SQL 输出参数~~但是可以得到 数据集合!Why3.代码如下:注（存储过程应该没问题  可以正确的输出结果集 和 SQL 输出参数）
      注：  LSFK: TStoredProc;代码如下：
  self.LSFK.Params.ParamByName('@CurYear').Value  := CurYear;
  self.LSFK.Params.ParamByName('@StartMonth').Value  := StartMonth;
  self.LSFK.Params.ParamByName('@EndMonth').Value := EndMonth;
  self.LSFK.Params.ParamByName('@PsName').Value := PsNames;
  self.LSFK.Params.ParamByName('@CheckAll').Value  := CheckAll;
  lSFK.Prepared := true;
  LSFK.ExecProc;
  LSFK.Active := true;
  TotalFiles :=  self.LSFK.Params.ParamByName('@TotalFiles').Value;
  Total_CBfiles :=  self.LSFK.Params.ParamByName('@Total_CBfiles').Value;
  ToTal_ZBFiles :=  self.LSFK.Params.ParamByName('@ToTal_ZBFiles').Value;
  ToTal_SYFiles :=  self.LSFK.Params.ParamByName('@ToTal_SYFiles').Value;执行后
     可以得到结果集
但是SQL输出参数都为默认值 都为0