Fórum Qual o erro dessa linha de código??? #513242

10/03/2015

0

Delphi

procedure TForm1.Button1Click(Sender: TObject);
var
a,b,c:extended;
Begin
TRY
a:=strtofloat(edit1.Text);
b:=strtofloat(edit2.Text);
c:=strtofloat(edit3.Text);
strtofloat(edit4.Text):=a*b*c;
EXCEPT
END;
end;
Rafael

Rafael

Responder

Posts

10/03/2015

William

procedure TForm1.Button1Click(Sender: TObject);
var
a,b,c:extended;
Begin
TRY
a:=strtofloat(edit1.Text);
b:=strtofloat(edit2.Text);
c:=strtofloat(edit3.Text);
strtofloat(edit4.Text):=a*b*c;
EXCEPT
END;
end;


Atribuição está do lado errado:

edit4.Text:=FloatToStr(a*b*c);
Responder

Gostei + 0

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

Aceitar