If edit > = <

Delphi

24/09/2013

estou com dificuldades de desenvolver está programação abaixo:


se edit1 for de 80,00 a 89,99 então edit2 será 1,5

se edit1 for de 90,00 a 100,00 então edit2 será 2,0

alguem pode me dar uma força?


Paulo

Paulo

Curtidas 0

Respostas

Wilton Júnior

Wilton Júnior

24/09/2013


if edit1.text >= '80,00' or edit1.text <= '89,99 then
edit2.text := 1,5
else
if edit1.tex >= '90,00' or edit1.text <= 100,00 then
edit2.text := 2,0;
GOSTEI 0
Sérgio Assunção

Sérgio Assunção

24/09/2013

if (StrToFloat(Edit1.Text) >= 80) and (StrToFloat(Edit1.Text) <= 89.99) then
Edit2.Text := '1,5'
else if (StrToFloat(Edit1.Text) >= 90) and (StrToFloat(Edit1.Text) <= 100) then
Edit2.Text := '2.0';
GOSTEI 0
Marcos Saffran

Marcos Saffran

24/09/2013

Olá Marcia,

o que aconteceu? Você mudou de nome?

Pois verifiquei que o tópico que respondi, que antes era do Paulo Sergio agora é seu.

Fiquei confuso agora.
GOSTEI 0
POSTAR