sqlstr:='select officename,intout =CASE intout  WHEN 1 THEN ''借'' WHEN 0 THEN ''贷''   ELSE ''错误''   END,';
       sqlstr:=sqlstr+
       'accountID,  abs(jymoney) as jymoney, jydate, memo, balance, ID, appendtime,fycause from VIEW_account  with dm.DMFrm.ADOQuery1 do begin
       active:=false;
       sql.Clear;
       sql.Add(sqlstr);
       active:=true;
     end;  end;//wiht
 frReport1.LoadFromFile('acSeach.frf') ;
 frReport1.ShowReport;
 为什么我打印记录总数的重复的一条数据.比如查出10条数据(不是重复的),但打印却出现重复的10条数据,而且是记录中的第一条,2到10条都不出现,不是所有的数据