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

韩冰

在onKeyPress事件中作一些处理

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

然后设置相应的标志。

* ?" p3 V; g" P" S

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

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

# [9 ^3 E H2 m

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

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

0 k5 H6 t! o: ]: p7 s+ a

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

, A, H, w7 @% n' N9 t+ ]

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

5 n" X4 h( |9 P" ?

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

就表明不是合法的数字

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

2 Z- l. a G# o7 E# c

try

; s, l6 v$ J% ^7 }6 A

{

; O+ Q2 }4 \4 T9 C4 P" @6 p$ G

Edit1->Text.ToDouble();

4 g. q. R4 ?3 b3 H; S

try

3 }! S9 ]: Z# T6 q% x( o

{

0 M: v/ S8 X6 p, e' Y* ^9 @1 d! q

Edit1->Text.ToInt();

ShowMessage("is a int");

}

- N; j0 R: b% @0 p: p

catch(const EConvertError &e)

{

9 J( [$ S* E8 c0 I( Z

ShowMessage("is a double");

( }( i9 E$ E7 X* R

}

$ @" p3 t) Q4 j# M/ Y b }$ R

}

' C. l/ b( R2 Q4 a0 i7 j) z1 B. u& B

catch(const EConvertError &e)

5 e$ c& k! z& i5 z. Y, `) C( I5 k

{

ShowMessage("not a int ot double");

}

上面的代码已通过调试