Cita:
Empezado por FGarcia
FieldByName('Suma').Value := StrToFloat(MidStr(Str,3,7)) + FieldByName('Suma').Value;
|
Probablemente toma a "0" como nulo... entonces cuando haces
suma = xxx + suma, intentas sumarle a suma el valor nulo...
prueba separarlo para ver con puntos de quiebra dónde te da el error... algo como
Código Delphi
[-] OldValue := FieldByName('Suma').Value;
FieldByName('Suma').Value := StrToFloat(MidStr(Str,3,7)) + OldValue;
Suerte.