Ver Mensaje Individual
  #2  
Antiguo 28-11-2011
Avatar de olbeup
olbeup olbeup is offline
Miembro
 
Registrado: jul 2005
Ubicación: Santiago de la Ribera (España)
Posts: 688
Reputación: 21
olbeup Va camino a la fama
Que tal esto:
Código Delphi [-]
...
var
  E1: Integer;
  E2, E3: Extended;
begin
  E1 := StrToInt(Edit1.Text);
  E2 := (StrToInt(Edit2.Text) * 0.2);
  E3 := (E1 * E2);
  Edit3.Text := FormatFloat('0.00', E3);
end;
Un saludo.
Responder Con Cita