Buenas gente, yo aca de nuevo, tengo el siguiente problemita y esta vez mefije como resolverlo pero todavia no lo logro.
Código Delphi
[-]
procedure TFrmfactura.RxCalcEdit1Change(Sender: TObject);
var
importe, Descuento:currency;
begin
importe:=strtofloat(edit2.text);
Descuento:=Importe*strtofloat(rxcalcedit1.Text)/100;
eddescmonto.Text:=floattostr(descuento);
Total:=Importe-Descuento;
edtotal.Text:= floattostr (Total);
end;
end
Esta es la cuenta que hago al final de la factura, anda bien y me hace los calculos bien, el tema es que el el edit que es el de descuento que es el codigo que postie arriba, me deja agregarle, por ejemplo yo le agrego un 10 y me realiza el descuento del 10 posciento, 20, 30, etc.Anda bien, me modifica el total con el correspondiente descuento.
Mi problema es que si yo pongo 10 y quiero borrarlo, me dice Ecoverterror with message "" is not a valid floating point. A que se debe esto, en donde tendria que ahcer el calculo.
Para que funcione esto tengo que poner, por ejemplo 10 y dar enter solamente, no puedo modificarlo ni nada.
Saludos!