Fórum Soma de campos edit #193914

10/11/2003

0

Tenho uma tela com cinco campo edit, onde serão digitados valores numéricos. Ao final do quarto campo, o edit5 tem q receber a soma dos outros quatro. Como faço? Ainda não consegui entender bem como fazer conversões...


Pisquila

Pisquila

Responder

Post mais votado

10/11/2003

Apenas complementando o topico do Denis. Eu faço assim:

Var
num1, num2, num3, num4, num5: real;
Begin
num1:= StrTofloat(edit1.text);
num2:= StrToFloat(edit2.text);
num3:= StrToFloat(edit3.text);
num4:= StrToFloat(edit4.text);
num5:= (num1+num2+num3+num4);
edit5.text:= FloatToStr(num5);


Henry

Henry
Responder

Gostei + 1

Mais Posts

10/11/2003

Denis

A fórmula para conversão dos dados do edit para valores numericos é a seguinte :

StrToFloat(edit1.text) .

Para fazer a soma, pode colocar no evento onchange do edit ou no onexit. Por exemplo. O edit6 será o resultado da soma dos outros.

edit6.text := FloatToStr(strtoFloat(edit1.text)+strtoFloat(edit2.text)+strtoFloat(edit3.text));

E nos enventos onchange o onexit, aponte para o mesmo evento do edit que vc. colocou o cálculo.

Acho que é isso.
Falou.


Responder

Gostei + 1

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar