zoukankan      html  css  js  c++  java
  • Delphi判断一个字符是否为汉字的最佳方法

    //判断字符是否是汉字 
    
     function IsHZ(ch: WideChar): boolean;
      var
        i:integer;
      begin
        i:=ord(ch);
        if( i<19968) or (i>40869) then
          result:=false else result:=true;
      end;
        
    //判断字符是否是汉字
    
    function IsHZ(ch: WideChar): boolean;
    var
      i:integer;
    begin
      i:=ord(ch);
      if( i<19968) or (i>40869) then
        result:=false
     else
     result:=true;
    end;
      
    //判断字符是否是汉字
      function TForm1.IsHZ(ch: Char): boolean;
      begin    //返回值为 0 的时候为单字节字符,返回值为 1 的时候为多字节字符
    if(ord(bytetype(ch,1))=1) then result:=true else result:=false; end; //判断字符是否是汉字 function TForm1.IsHZ(ch: Char): boolean; begin //返回值为 0 的时候为单字节字符,返回值为 1 的时候为多字节字符
    if(ord(bytetype(ch,1))=1) then result:=true else result:=false; end; //判断字符是否是汉字 function IsMBCSChar(const ch: Char): Boolean; begin Result := (ByteType(ch, 1) <> mbSingleByte); end;

      

  • 相关阅读:
    OCP-1Z0-053-V12.02-597题
    OCP-1Z0-053-V12.02-599题
    OCP-1Z0-053-V12.02-609题
    OCP-1Z0-053-V12.02-604题
    OCP-1Z0-053-V12.02-607题
    OCP-1Z0-053-V12.02-588题
    OCP-1Z0-053-V12.02-592题
    OCP-1Z0-053-V12.02-587题
    OCP-1Z0-053-V12.02-582题
    OCP-1Z0-053-V12.02-583题
  • 原文地址:https://www.cnblogs.com/qingsong/p/4033109.html
Copyright © 2011-2022 走看看