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

韩冰

在onKeyPress事件中作一些处理

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

6 S, C( F/ n, K9 K/ Z

- [. p; m' ~! T; l$ D

然后设置相应的标志。

# y. o0 J& m6 f8 a4 K R2 m; b6 t

c4 ` g# R& o. _8 X; f

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

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

8 H8 Z# x I6 `, F6 r! d3 ^2 |9 O" L

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

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

& D2 A' ?) U+ U c- o

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

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

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

9 ~# W1 k8 M4 l8 X

就表明不是合法的数字

* x! X* q, m8 b Q6 r! g3 R8 r8 z

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

try

{

Edit1->Text.ToDouble();

try

' B: b; l4 T! K! Z

{

! }3 K6 d- n! o9 e7 B ?4 |

Edit1->Text.ToInt();

ShowMessage("is a int");

}

' U- p( e9 ^( A' A% @. D% \4 l( E, H

catch(const EConvertError &e)

. e, Q8 @4 y! V1 k9 m

{

6 N5 O; O6 n( ?8 R: Q

ShowMessage("is a double");

}

( i3 J: s: h# K

}

l9 \; w. l/ a; A+ O

catch(const EConvertError &e)

{

ShowMessage("not a int ot double");

, o5 P( c, X& t/ H" {

}

. V* w! R* y8 @7 c9 ]7 v2 I

上面的代码已通过调试