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

韩冰

在onKeyPress事件中作一些处理

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

然后设置相应的标志。

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

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

& d1 e6 E4 x4 I8 i6 o+ a/ t3 K

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

, [" D. A. l9 L4 q$ g

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

) N2 t$ \: E: G$ P K

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

1 D, B' n& ?: y2 G2 m; F, x

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

' I* v' R3 x" S# n) ?

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

V, ^ v/ L3 S; a9 z( Y* L9 c' P l

就表明不是合法的数字

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

3 ?% R9 u. q/ d: d- q& ?' D7 T9 J

try

- m: Y2 V- _( D

{

Edit1->Text.ToDouble();

7 q! U4 }0 ~5 ]7 V+ Q

try

: w9 [1 N! f: C; q' h7 B

{

Edit1->Text.ToInt();

% Q- g7 m9 n* O7 J# ?& [

ShowMessage("is a int");

}

catch(const EConvertError &e)

{

ShowMessage("is a double");

7 m( b4 E' U& `3 ~

}

/ Q1 b# z9 W% O0 n

}

catch(const EConvertError &e)

{

, ?& [% z6 d( C; r& w

ShowMessage("not a int ot double");

5 Y' y1 S# ^. a5 l9 o8 ?+ b" v& Y) o

}

; b/ g, h+ L; u

, K. |9 g. h& k2 Z

上面的代码已通过调试