problema son StrToFloat

[juggern]

Hola chicos,

No, ya os digo que el problema no es la coma decimal, es que el valor lo mete a 0. No da ningún error. De hecho, si te fijas en el ejemplo, no lleva decimales en ese caso.

Acabo de revisarlo por si acaso para decírtelo fijo, no siendo que lo hubiera mirado mal y el campo de la base de datos es Money.

Incluso si directamente hago

Código Delphi [-]
Valor1:= 100;

Me mete un 0.