Hola.
Cita:
|
Ola quiero saber porque me arroja errores el delphi con respecto a este Programa
|
.
Bueno, en principio dependerá de que valor tiene la propiedad
Text de Edit1. Si su contenido es:
Juan Carlos, generará un error sin dudas ya que
Juan Carlos no es un número...
En cuanto a la obtención de numeros decimales, solo debes cambiar el tipo de variable, de división y conversión:
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
var
num, tot: Double;
begin
num:= StrToFloat(edit1.Text);
tot:= num * 15 / 100;
Label4.caption:=' El 15% de ' + FloatToStr(num) + ' es '+ FloatTostr(tot);
end;
Saludos.