Importe Con decimales pero sin punto

[jafl1965]

Multiplicando por 100 la cantidad antes de imprimirla?

[marcoszorrilla]

La solución que te da jafl1965 es correcta, lo que ocurre es que los bancos piden un fichero de texto con el importe sin decimales y además rellenar con ceros por la izquierda.

Aquí tienes un posible ejemplo:

Código Delphi [-]
 procedure TForm1.Button1Click(Sender: TObject);
 var
 nImporteouble;
 cNum2Texto:String;
 begin
 nImporte:=1299.33;
 cNum2Texto:=FormatFloat('000000000000000',nImporte * 100);
 ShowMessage(cNum2Texto);
 end;

La variable cNum2Texto, seria la que tendríamos que guardar en el fichero de texto para el banco.


Un Saludo.

[jovehe]

Que tal a los dos

Muchas GRacias por su ayuda efectivamente salio multiplicando la cantidad por 100, y si como dice marcos lo que pasa que es para generarun texto para importar datos a un sistema bancario.

ya quedo resuelto
Gracias y hasta pronto.
SALUDOS¡¡