如题

解决方案 »

  1.   

    根据ASCII判断你可以遍历该字串,
    ASCII值大于127说明中文数据的ASCII我也忘 了:)
    自己看看吧。================================================================
         ◆◆◆ CSDN查询助手,查询方便快捷 ◆◆◆ 下载地址:  
     http://CoolSlob.ifood1.com/Download/CSDNFinder.exe  
     http://CoolSlob.8u8.com/Download/Tools/CSDNFinder.Slob[更名为.exe即可]  
      

  2.   

    做一个循环,判断对应的字符的ASC就好了~~~~~~~~~~~~~~~~~~~~~~~~  
     世界因为你我而年轻!
    ☆★○●◎◇◆□■△▲※
      

  3.   

    1)ASCII值大于127说明中文
    2)if (Pos('0',s)>0) or (Pos('1',s)>0) or (Pos('2',s)>0) or
    ... Pos('8',s)Pos('9',s) then 有数字
      

  4.   

    得到一个字符串有多少中文字符和数字字符:procedure TForm1.Button1Click(Sender: TObject);
    var
            sw:widestring;
            s:string;
            cs:string;
            c:char;
            i,wcount,mcount:integer;
    begin
            sw:=edit1.Text;
            cs:=edit1.Text;
            wcount:=0;
            mcount:=0;
            for i:=1 to length(sw) do
            begin
                    s:=sw[i];
                    c:=cs[i];
                    if length(s)>1 then inc(wcount);
                    if c in ['0'..'9'] then inc(mcount);
            end;
            edit2.Text:=inttostr(wcount);//中文字符数
            edit3.Text:=inttostr(mcount);//数字字符数
    end;