Foros Club Delphi - nuevamente

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)

- - nuevamente (https://www.clubdelphi.com/foros/showthread.php?t=5665)

marianaf

28-11-2003 22:49:33

nuevamente

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

28-11-2003 22:58:06

Prueba con esto:

Código:

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

29-11-2003 02:14:38

Cita:

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:

Código:

var

    fCantidad : float;

    sLetras : string;

begin

       fCantidad := strtofloat(edit1.text);

       sLetras := floatToLetras(fCantidad);

end;

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

Ruben_Cu

29-11-2003 05:45:53

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

La franja horaria es GMT +2. Ahora son las 12:53:41.