Problemas con Format y OldValue
 

Hola !

No sé por qué me da error la siguiente instrucción :

Código Delphi [-]
Aux_SelectSQL1 := Aux_SelectSQL1 + Format('%m', [IBDataSet1AMOUNT.OldValue])

Me dá error diciéndome 'Format '%m' invalid or incompatible with argument'. Utilizo Delphi 2007 y Firebird 2.1

En cambio, si asigno previamente el valor a una variable tipo Real, no dá problema :

Código Delphi [-]
var
  Aux_Real : Real
 
...
 
Aux_Real := IBDataSet1AMOUNT.OldValue;
Aux_SelectSQL1 := Aux_SelectSQL1 + Format('%m', [Aux_Real])

Estoy cambiando código de Delphi 2006 Vcl.Net a Delphi 2007 Win32, y no si voy a tener que cambiar todas estas líneas de este tipo introduciendo una variable intermedia. :(

Gracias por vuestra ayuda.

Así al menos lo he podido solucionar sin meter ninguna variable intermedia :

Código Delphi [-]
Aux_SelectSQL1 := Aux_SelectSQL1 + Format('%m', [FloatToCurr(IBDataSet1AMOUNT.OldValue)]);

;)