Código Delphi [-] suma1 := suma1 + Sender.DataSet.FieldByName(Sender.DataField).AsFloat;
suma1 := suma1 + Sender.DataSet.FieldByName(Sender.DataField).AsFloat;