判断EDIT框输入的是否为数字

韩冰

在onKeyPress事件中作一些处理

6 F; R9 f! r% ]4 g }/ a

使得输入只能是数字和一个小数点

, V- P3 L& P5 D1 U7 \

然后设置相应的标志。

4 t1 @) |# N2 a b+ ?) t9 i; q6 l7 a

& L, D( H1 l$ i. l5 [" H8 M

当然，还有另外的办法，就是用pos函数来查找是否有小数点

- x9 q6 d% ~$ e

如果没有，那么就是整数，反之是小暑，但是这个方法有一个缺陷

就是如果输入的不只是数字，还有字母的话，那么判断显然是错误的。

. l4 E5 L3 |) T* ?4 d0 C# m

此外，如果是以指数方式表示的，那么前两种的判断方法都会复杂起来。

. W, A8 F0 G; P- {

2 d5 s5 l1 H7 K: ]

于是，还有第三个办法，用好Exception

首先，用Edit1->Text.ToInt，如果不产生异常，表明是整数，反之用

Edit1->Text.ToDouble，如果不产生异常，那么是小数，反之

就表明不是合法的数字

8 [ C) j" U$ \7 L0 F) ]0 R* N$ m

这个办法最方便。大概的程序代码如下

try

{

Edit1->Text.ToDouble();

try

{

! I9 ^- f' A6 ]: z0 G! L0 H9 {4 ~

Edit1->Text.ToInt();

ShowMessage("is a int");

9 P) r# s$ g9 P

}

0 J- k; n4 S4 D) i5 B

catch(const EConvertError &e)

; [1 d# F. S; d2 `) z2 ?

{

ShowMessage("is a double");

}

}

6 j3 b2 N( C7 e) z, O# b$ P

catch(const EConvertError &e)

* M% O: O p6 e# Z* z: D$ Z

{

ShowMessage("not a int ot double");

$ q+ u& G3 h8 ]

}

. `* ^& Z5 R) H

上面的代码已通过调试