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

韩冰

. a5 T7 F* d* e8 j. V9 Y3 ]# o+ }

在onKeyPress事件中作一些处理

5 I Z+ r+ N5 G* |( t q4 }

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

" Q, K9 _5 e6 ]1 V2 Z" ^9 Z

然后设置相应的标志。

; N8 f; h' \! N+ G$ f1 ]

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

, g6 @2 D. j0 j I

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

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

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

o/ p9 ?+ x1 X2 p

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

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

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

就表明不是合法的数字

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

1 n) p' X: I# U

try

2 Q$ m2 C- {+ E

{

( `+ d( Z! B3 |8 I% _

Edit1->Text.ToDouble();

( b. U% a* ^0 U% E: B/ } i

try

, s: j+ e' F8 g1 G" ~& f) a

{

Edit1->Text.ToInt();

ShowMessage("is a int");

H8 U0 ]$ E" W. E3 ?7 l/ ^

}

7 l" k) I V" E

catch(const EConvertError &e)

{

1 K/ r8 P: s9 \; b" X' q5 V

ShowMessage("is a double");

}

}

) h2 ?6 k$ ~3 R" O$ Z# J8 ?

catch(const EConvertError &e)

{

! G% {" i. h6 }/ n; X6 [ u

ShowMessage("not a int ot double");

5 B2 [5 y1 B2 v4 ~

}

上面的代码已通过调试