同上pos和ansipos怎么都去分大小写阿?
他们有何区别?多谢!

解决方案 »

  1.   

    Pos与AnsiPos区别在于,AnsiPos: This function supports multi-byte character sets (MBCS).出自在线帮助。
      

  2.   

    procedure TForm1.Button1Click(Sender: TObject);
    var
      s :  String;
      i : Integer;
    begin
      s := 'I am supper man';
      i := pos(Uppercase('Supper'),Uppercase(s));
      showmessage(inttostr(i));
    end;
      

  3.   

    好像没有发现这样的函数,
    你可以自己写一个!function MyPos(const Substr, S: string): Integer;
    begin
      Result := Pos(UpperCase(SubStr), UpperCase(S));
    //还需要注意一下,这样专换后字符全部都是大写,你可以想办法解决,或采用其他更好的方法。
    end;
      

  4.   

    To:CoolSlob(昨日的友情,早已消失在黄昏的牛粪火中) 
    有点不好意思. :)