Zitat:
tpRunTotal := FloatToStr((StrToFloat(tpRunTotal) + (StrToFloat(Table.FieldByName(field).AsString))));
uargh ...... whats that ....
Query with SUM as described is the better solution, but if you want to use something like that, then use a double or currency for tpRunTotal and convert it after the loop ...