一个判断输入的字符串是否为数字的函数！

ilikenba

bool __fastcall TForm1::isnumber(const AnsiString str)
{
  int m=0;
  int b=str.Length();
  for(int i=1;i<=b;i++)
, c( z6 U9 ~* q0 V5 A- @- O  {
7 @( g1 M# ^. d5 `     char c=str;
# ^4 \' G0 X4 d2 }: \     int check=isdigit(c);
     if(check ==0)
3 s' k, d) W5 x     {
1 i2 ]8 E' }) t8 @0 T' _) S       if(c!='.')
         return false;
       else
       {
         m=m+1;
         if(m>1)
           return false;
       }
# @, g; S; Y( c: Y     }
  }
* X) u  D5 Q7 ~: f7 i  return true;
}

libertysigil

这样行不行?

bool __fastcall TForm1::isnumber(const AnsiString str)

try {

IntToStr(str);

return true;

}

castch(...)

{

return false;

}

ilikenba

以下是引用libertysigil在2004-4-30 17:06:03的发言： ; ?! [9 Y& h4 m: c D6 e4 s

这样行不行?

bool __fastcall TForm1::isnumber(const AnsiString str)

try {

IntToStr(str);

7 ?, d# j; R% |# d9 @

return true;

}

castch(...)

, O+ U* O0 d* k

{

return false;

}

' J2 P* e- A3 n+ B' r+ U

注意对于一个函数来说,应该做的尽量健壮,你的那个函数利用了VCL的默认异常处理器，但是如果你在析构函数中需要利用这个函数，就不能用你这个函数，因为析构函数很可能就是一个异常引起的，它需要释放一个对象的内存，要是在这里还要引发异常的话，就很难做到了！