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

韩冰

在onKeyPress事件中作一些处理

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

0 q& R, o0 v* g! J8 O9 V; G p" o

然后设置相应的标志。

: O' y( d: z! s

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

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

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

$ U0 [( D+ ]1 Y# Q) L

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

6 C+ T$ D6 n# J% }* l' j! N

* G; G! o: F( a

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

2 S+ K% A. M" m5 q

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

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

3 F3 t. Z! L! f# K; `$ q; F

就表明不是合法的数字

6 r, K6 ^ O1 C4 `8 I9 ]

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

try

{

Edit1->Text.ToDouble();

try

{

6 C- }$ w& s2 N/ B

Edit1->Text.ToInt();

ShowMessage("is a int");

}

N5 i% r4 R5 [* _

catch(const EConvertError &e)

' ^, Z. _% y% ^2 p6 x% H; J; d

{

9 x3 S" r# W2 G# T6 ?7 D9 \

ShowMessage("is a double");

}

3 k# l7 ^ r5 @, P

}

catch(const EConvertError &e)

! X R% h, }+ f/ r

{

ShowMessage("not a int ot double");

& O* H% x2 t9 i1 }

}

+ z0 b6 I, Q F2 ^) A6 J- S& m

上面的代码已通过调试