QQ登录

只需要一步,快速开始

 注册地址  找回密码
查看: 3189|回复: 0
打印 上一主题 下一主题

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

[复制链接]
字体大小: 正常 放大
韩冰        

823

主题

3

听众

4048

积分

我的地盘我做主

该用户从未签到

发帖功臣 元老勋章

跳转到指定楼层
1#
发表于 2005-1-26 12:27 |只看该作者 |倒序浏览
|招呼Ta 关注Ta

_9 L: M' |( [0 }$ g4 S7 P& }

在onKeyPress事件中作一些处理

" p: Z' s- |; q. a& {

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

) I5 t- h2 @- w, J) v

% p& w. M1 m& ] T! [

然后设置相应的标志。

. M9 N/ ~1 k( y9 u

0 V! g: g! l! @; x% o

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

' l, V# ]2 J) U' Y3 C

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

{& [2 \2 s; b" Q( @0 O

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

' i1 ^; P2 t, h* D: k# J, j. E2 R4 B6 d

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

) y" {! Q% i1 c4 I: [

3 M* _: d5 J* N% I& H, |

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

4 p4 Z9 f& P" h: t2 T4 A2 w) g

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

% i: M e6 F7 S) b

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

: P+ u: x/ w8 X: y, T2 j4 Q9 I

就表明不是合法的数字

$ T' e7 ^' N: N$ a4 c9 D V' n4 ^

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

: D, F0 [. D; |/ X: j6 M0 L

2 s6 s% ?9 R2 M

try

7 ]: y. @- d) w, t$ a6 ^; C: V

{

1 O% ^) q+ |1 [

Edit1->Text.ToDouble();

. Q- s% c, u Z3 d/ J" k+ `

try

' x8 K5 V6 f5 D( ?0 W6 @* d/ K6 [) c0 g

{

8 v- E) C2 A' @1 s4 y9 j

Edit1->Text.ToInt();

6 `0 H9 T; H- ^: g3 d6 G

ShowMessage("is a int");

) {, ]4 \" L; T7 k

}

% y/ K3 T1 ?" j9 ~' _

catch(const EConvertError &e)

3 c' R" N' C8 K; r. P* l

{

: a4 Z/ a1 g* @3 b/ B

ShowMessage("is a double");

. N& w+ M% {+ X+ i0 h" \

}

7 X1 k* \& h$ K; u, e2 F5 \( F. ~

}

Q3 a r! |0 f8 `9 k

catch(const EConvertError &e)

, p1 R, r- l1 ~

{

/ V- D0 [$ T3 X6 I" Q( i6 a1 X+ u: i) g

ShowMessage("not a int ot double");

; J# ?0 z" n5 w- `( b

}

# [; N, i/ t; _; k4 _( L- b

2 a; |. b5 c% |

上面的代码已通过调试

zan
转播转播0 分享淘帖0 分享分享0 收藏收藏0 支持支持0 反对反对0 微信微信
您需要登录后才可以回帖 登录 | 注册地址

qq
收缩
  • 电话咨询

  • 04714969085
fastpost

关于我们| 联系我们| 诚征英才| 对外合作| 产品服务| QQ

手机版|Archiver| |繁體中文 手机客户端  

蒙公网安备 15010502000194号

Powered by Discuz! X2.5   © 2001-2013 数学建模网-数学中国 ( 蒙ICP备14002410号-3 蒙BBS备-0002号 )     论坛法律顾问:王兆丰

GMT+8, 2026-6-10 21:09 , Processed in 0.301180 second(s), 52 queries .

回顶部