在delphi里有没有这样的函数,有一个字符串str,我现在想取我指定起始位置和长度的子串。

解决方案 »

  1.   

    Returns a substring of a string or a segment of a dynamic array.
    Unit
    System
    Category
    string handling routines
    Delphi syntax:
    function Copy(S; Index, Count: Integer): string;
    function Copy(S; Index, Count: Integer): array;
      

  2.   

    var
      vStr:String;
    begin
      vStr:='1234567890';
      Result:=Copy(vStr,3,4);  //取出vStr中起始位置为3,长度是4的子串,为'3456'
    end;
      

  3.   

    copy(str,pos,num) 从str字符串的pos处开始,截取num个字符的串返回.假设str为'abcdef',copy(str,3,2)='cd',copy(str,4,10)='def'
    concat(str1,str2{,strn}) 把各自变量连接起来,返回连接后的字符串(长度不能超过255)length(str)       返回str的字符个数,即其长度.
    {返回两个子字符串之间字符的个数}
    Function p2pcount( s, ss1, ss2 : string ): integer;
    var i, j, slen : integer;
    begin
       i := pos( ss1, s );
       j := pos( ss2, s );
       slen := Length(ss2); 
       if j >= i then Result := j - i + slen else Result := 0;
    end;