Código Delphi [-] Label1.Caption := FloatToStr(StrToFloat(Edit1.text) * StrToFloat(Edit5.Text) / 100);
Label1.Caption := FloatToStr(StrToFloat(Edit1.text) * StrToFloat(Edit5.Text) / 100);