Buenas gente. Pequeño problemilla.
Tengo un edit, cuyo texto debo pasarlo a nro. decimal para guardarlo en una tabla. Para chequear que el usuario escriba un nro. decimal y no cualquier cosa, hice lo siguiente:
Código Delphi
[-]try
subtotal := StrToFloat(Edit6.Text);
except
on E: Exception do
begin
Edit6.Text := '';
Edit6.SetFocus;
end;
end;
La cuestión es que no me lo toma, arroja error igual cuando no puede castearlo. Me pareció más fácil realizar esto que ponerme a chequear los caracteres que ingresa, que si son nros, que si es una coma, etc, etc. O capaz hay alguna solución mejor???
Toda ayuda es aceptable, ja. Uso delphi 7
Muchas gracias