Foros Club Delphi - Calculos con un TEdit

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

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

- - Calculos con un TEdit (https://www.clubdelphi.com/foros/showthread.php?t=17346)

BlueSteel

05-01-2005 15:33:18

Calculos con un TEdit

Hola ... tengo el siguiente problema....

vTot_Iva.Text es una TEdit... y debe contener el 19% de otro TEdit... vTot_Net.Text

Actualmente lo estoy realizando de la siguiente forma:

vTot_Iva.Text := IntToStr(StrToInt(vTot_Net.Text)*0.19);

pero no me funciona.. ya que estoy usando las variables como enteras.. y no me aceptan decimales...

¿Como tengo que realizar el proceso para que me acepte los decimales...? pero sin utilizar variables externas... solo los mismos TEdit...

Existe un FloToStr ? :(

marcoszorrilla

05-01-2005 15:53:50

vTot_Iva.Text := IntToStr(StrToInt(vTot_Net.Text)*0.19);

vTot_Iva.Text := FloatToStr(StrToFloat(vTot_Net.Text)*0.19);

Un Saludo.

Ohcan

05-01-2005 15:54:33

Hola BlueSteel

Intenta:

vTot_Iva.Text := FloatToStr(StrToFloat(vTot_Net.Text)*0.19);

Salu2

BlueSteel

05-01-2005 16:18:54

Gracias....

y ahora como hago para que me redondee.... y me entregue el entero ?... y si el decimal en igual o mayor a 5 me sume 1 al entero ? :confused:

Neftali [Germán.Estévez]

05-01-2005 16:45:34

Busca en la ayuda de Delphi sobre las funciones Round y SetRoundMode.

La franja horaria es GMT +2. Ahora son las 13:01:41.