zoukankan      html  css  js  c++  java
  • 判断字符是否为整数、浮点型小数、字符串

    function TForm_fangyuanhuizong_tubiao.IsNumber(s: string): integer;     //判断是否为整数、浮点型小数、字符串
    var  
    i   :   integer;
    begin
          result   :=   2;
          for   i   :=   1   to   Length(s)   do  
          begin  
              if   (s[i]   <   '0')   or   (s[i]   >   '9')   then  
              begin  
                  if   (s[i]   =   '.')   and   (i   <>   1)   and   (i   <>   Length(s))   then  
                  begin  
                      if   result   =   1   then  
                      begin  
                          result   :=   2;  
                          Exit;  
                      end;  
                      result   :=   1;  
                      continue;  
                  end;  
       
                  exit;  
              end;  
          end;  
          if   result   <>   1   then   result   :=   0;

          //返回   0   --   integer     1   --   double         2   ---string
    end;

  • 相关阅读:
    文件操作
    python中的函数递归和迭代问题
    函数的闭包与装饰器
    函数的名称空间和作用域
    python学习之路(四) ---函数
    python __name__问题
    浅谈python中的引用和拷贝问题
    Python中的缩进问题
    粘包现象
    socket编程
  • 原文地址:https://www.cnblogs.com/lantianhf/p/5778540.html
Copyright © 2011-2022 走看看