Hola
Veo poco, pero:
1: las variables las declaras publicas ???, donde estan, (solo veo i : Integer)
2: Las variables obtienen su valor de los edits (me parece) entonces por que las declararlas con 0.00 ????.
No entiendo muy bien el concepto que tienes al hacer tantos calculos y con tantas opciones diferentes en un procedimiento, me imagino que estoy viejo y esto es lo moderno.
Saludos