nuevamente

[marianaf]

Repito mi pregunta:
Por favor necesito que alguien me ayude cuanto antes. Mi problema es el siguiente: tengo una variable string en la cual escribo un monto (esto es porque la ingresa el usuario), a esa variable la paso a float y obtengo el monto en letras (es decir 150 = ciento cincuenta), pero yo quiero que ese monto contenga los decimales.
Probe de ponerle al strin los decimales,150.00, pero al pasarlo a float los pierde.
Por favor AYUDA

[marcoszorrilla]

Prueba con esto:

procedure TForm1.Button1Click(Sender: TObject);
var
MiFloat:Double;
begin
 try
 MiFloat:=StrToFloat(Edit1.Text);
 except
 ShowMessage('Tipo de datos incorrectos.');
 end;
end;

Un Saludo.

[hecjona]

Mariana wrote:...a esa variable la paso a float y obtengo el monto en letras (es decir 150 = ciento cincuenta),

creo que para poder ayudarte necesitas decirnos como conviertes de Float a "letras"

si no me equivoco lo que tienes es algo asi:

var
    fCantidad : float;
    sLetras : string;
begin
       fCantidad := strtofloat(edit1.text);
       sLetras := floatToLetras(fCantidad);
end;

floatToLetras => ¿que funcion usas para hacer esto)?

[Ruben_Cu]

Hola marianaf, leete y analiza este hilo puede ayudarte alo que deseas lograr.
Saludos