Pues al meterlos en la variable multiplicalos por 100 de manera que:
250,00 * 100 = 25000
36654,01 * 100 = 36654001
457487,25 * 100 = 45748725
P.D.1. Claro eso es si sabes que son siempre dos decimales
P.D.2. Luego para los ceros ...
Código Delphi
[-]
limite:= 15-length(Numero)
while i< limite do
begin
Numero:= '0' + Numero;
inc(i);
end