取DBGrideh统计值的问题

我想取出某几列的统计值,经过运算之后,再赋给其他列做统计值,不知道这样做对不对?
提示:[Error] Unit1.pas(236): Incompatible types: 'Integer' and 'String'
除了这个应该还有其他的错误
代码中都是一样的运算,主要就是取出两列的统计值相除再赋值给第三列做统计值
 var
    c1,c2,c3,c4,c5,c6,c8,c9,c10,c11:integer;
DBGrideh1.Columns[0].Footer.Value:='合计:';
DBGrideh1.Columns[0].Footer.ValueType:=fvtStaticText;
DBGridEh1.Columns[1].Footer.ValueType:=fvtSum;
DBGridEh1.Columns[2].Footer.ValueType:=fvtSum;
DBGridEh1.Columns[3].Footer.ValueType:=fvtSum;
DBGridEh1.Columns[4].Footer.ValueType:=fvtSum;
DBGridEh1.Columns[5].Footer.ValueType:=fvtSum;
DBGridEh1.Columns[6].Footer.ValueType:=fvtSum;
DBGridEh1.Columns[7].Footer.ValueType:=fvtSum;
c1:=DBGridEh1.GetFooterValue(1,DBGridEh1.Columns.Items[1]);
c2:=DBGridEh1.GetFooterValue(1,DBGridEh1.Columns.Items[2]);
c3:=DBGridEh1.GetFooterValue(1,DBGridEh1.Columns.Items[3]);
c4:=DBGridEh1.GetFooterValue(1,DBGridEh1.Columns.Items[4]);
c5:=DBGridEh1.GetFooterValue(1,DBGridEh1.Columns.Items[5]);
c6:=DBGridEh1.GetFooterValue(1,DBGridEh1.Columns.Items[6]);
DBGridEh1.Columns[8].Footer.ValueType:=fvtStaticText;
if c1=0 then
   c8:=0
else
   c8:=c3/c1;
DBGridEh1.Columns[9].Footer.ValueType:=fvtFieldValue;
if c2=0 then
   c9:=0
else
c9:=c4/c2;
DBGridEh1.Columns[10].Footer.ValueType:=fvtFieldValue;
if c4=0 then
   c10:=0
else
c10:=c6/c4;
DBGridEh1.Columns[11].Footer.ValueType:=fvtFieldValue;
if c4=0 then
   c11:=0
else
c11:=c5/c4;
DBGridEh1.SumList.Active := True;
  end;