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

韩冰

/ g) A. P) k k4 y

在onKeyPress事件中作一些处理

+ B6 U6 H x# c6 m4 I4 ?

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

w7 }$ X; N9 x# o& Q4 w- l

- ?1 \) E" x+ m3 [: ]5 M6 M* w

然后设置相应的标志。

% r9 Q5 I s. L, t( @8 D5 ?

3 z8 K% j) w5 I# m$ |$ I2 v

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

+ r" i9 \6 a' `% E' C T; i

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

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

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

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

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

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

就表明不是合法的数字

6 n2 B9 f; g% {, U+ ~( ]! `; y

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

4 \ ^0 }" Q- o! p1 V& \

try

{

Edit1->Text.ToDouble();

5 J& J' T. j+ e h6 ?

try

{

Edit1->Text.ToInt();

# W/ _; ] ^4 Q$ l: N6 f5 [ a, N

ShowMessage("is a int");

) x' M7 `' b m$ \

}

+ `- P$ I J$ p1 E

catch(const EConvertError &e)

! i# j1 _/ z' O$ N

{

1 U, `6 T/ s" S

ShowMessage("is a double");

}

}

U6 W0 k4 U! B4 p: G% {

catch(const EConvertError &e)

{

& }1 f U8 w c6 `) y

ShowMessage("not a int ot double");

}

9 c, m C# D$ i$ G8 a4 H

上面的代码已通过调试