Ver Mensaje Individual
  #2  
Antiguo 24-07-2008
Avatar de Caro
*Caro* Caro is offline
Moderadora
 
Registrado: jul 2004
Ubicación: Cochabamba, Bolivia
Posts: 2.544
Reputación: 22
Caro Va por buen camino
Hola josi, estas llenando tus Edits?, yo creo que en alguno de ellos o no tienes un valor o el valor que tienes no es valido.

Porque haces la conversión en tu variable h, si despues haras calculos para llenar el edit11.

Si ya tienes guardado el valor de tu edit7 en tu variable a, sería mejor que utilizaras esa variable y no volver a realizar la conversión.

Código Delphi [-]
procedure TFrmprestamo.BitBtn1Click(Sender: TObject);
var
 a,b,c,d,e,f,h:double;
begin
 a:=strtofloat(edit7.Text); //cantidad solicitada
 b:=strtofloat(edit14.Text); //meses de pago
 c:=strtofloat(edit15.Text); // interes
 e:=strtofloat(edit9.Text); //cuotas
 f:=strtofloat(edit10.Text);// cantada de cuotas
 h:=strtofloat(edit11.Text); //total a pagar
 if combobox3.Text=('mensual')then
  d:=1;
 begin
 h := a/ 100 + a;
 edit11.Text:= floattostr(h);
 
 end;
end;

Si es error es sobre alguno de tus edit, en este mensaje seguro que también te debe indicar el edit que te esta dando el error ''is not floating point value''.

Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar.
Responder Con Cita