Cuando tenía esta aplicación en Delphi 7 hacía lo siguiente sin problema:
qrTarifasNeto.AsCurrency := qrTarifasValor.AsCurrency * qrTarifasDescuento.AsFloat
Asignaba por ejemplo : Valor := 25000 , Descuento := 0,265 y obtenía Neto := 6625 que es lo correcto.
En delphi 2009 intento hacer lo mismo con los mismos valores y obtengo el valor para TarifasNeto 6625000.
El problema parece estar en el formato, pero no se cómo resolverlo.
Muchas gracias por su ayuda.
Saludos