我想取出一个string的左边几个字符,却没有相应的函数

解决方案 »

  1.   

    兄弟,这话可不能乱说啊!!━━━━━━━━━━━━━━━━━━━━━  
    首部  function LeftStr(const AText: string; const ACount: Integer): string; $[StrUtils.pas
    功能  返回字符串AText左边的ACount个字符
    说明  LeftStr('123456', 3) = '123'
    参考  function System.Copy
    例子  Edit3.Text := LeftStr(Edit1.Text, SpinEdit1.Value);
    ━━━━━━━━━━━━━━━━━━━━━  
    首部  function RightStr(const AText: string; const ACount: Integer): string; $[StrUtils.pas
    功能  返回字符串AText右边的ACount个字符
    说明  RightStr('123456', 3) = '456'
    参考  function System.Copy
    例子  Edit3.Text := RightStr(Edit1.Text, SpinEdit1.Value);
    ━━━━━━━━━━━━━━━━━━━━━  
    首部  function MidStr(const AText: string; const AStart, ACount: Integer): string; $[StrUtils.pas
    功能  返回字符串AText从AStart开始的ACount个字符
    说明  其实就是Copy
    参考  function System.Copy
    例子  Edit3.Text := MidStr(Edit1.Text, SpinEdit1.Value, SpinEdit2.Value);
    ━━━━━━━━━━━━━━━━━━━━━  
      

  2.   

    delphi的函数很好用啊!!而且对大部分API进行了封装。
    试试用copy函数吧,应该能解决你这个问题
      

  3.   

    小弟浅薄,刚学Delphi不久,多谢大侠们指点