DBGridEh1.Columns[13].Footer.ValueType := fvtSum;
DBGridEh1.Columns[14].Footer.ValueType := fvtSum;
DBGridEh1.Columns[15].Footer.ValueType:=fvtFieldValue;//对不对
想:DBGridEh1.Columns[15].Footer.Value:=DBGridEh1.Columns[13].Footer.ValueType /DBGridEh1.Columns[14].Footer.ValueType?
怎么解决问题? (所有的都是FLOAT)!

解决方案 »

  1.   

    改成如下:
    var
      c13, c14, c15: double;
    begin
      DBGridEh1.Columns[13].Footers[0].ValueType := fvtSum;
      DBGridEh1.Columns[14].Footers[0].ValueType := fvtSum;
      DBGridEh1.Columns[15].Footers[0].ValueType := fvtStaticText    
      c13:=DBGridEh1.Columns[13].Footers[0].sumValue;
      c14:=DBGridEh1.Columns[14].Footers[0].sumValue;
      if c14=0 then 
        c15:=0 
       else
        c15:=c13/c14;
      DBGridEh1.Columns[15].Footers[0].sumValue:=c15;
    end;
      

  2.   

    哎,少了个;  打上补丁:
    DBGridEh1.Columns[15].Footers[0].ValueType := fvtStaticText;