一个字符串比如erwsd怎样在每个字符中间加一空格变成e r w s d

解决方案 »

  1.   

    比如是 s: string;
    s := 'erwsd;
    s[1] = 'e'....
    可用下標讀取!
      

  2.   

    var s: string;
    begin
      s := 'erwsd';
      stuffstring(s,1,0,' ');
      stuffstring(s,3,0,' ');
      stuffstring(s,5,0,' ');
      stuffstring(s,7,0,' ');
    end;说明:
    function StuffString(const AText: string; AStart, ALength: Cardinal; const ASubText: string): string; $[StrUtils.pas
    功能 返回嵌套字符串
    说明 AStart:嵌套开始位置;ALength:嵌套长度;StuffString('abcd', 2, 0, '12') = 'a12bcd'
      

  3.   

    如何提取一个固定长度的字符串的单个字符,用什么函数??
    --------------------------------------------------
    MidStr(const AText: string; const AStart, ACount: Integer): string; 
    功能 返回字符串AText从AStart开始的ACount个字符
      

  4.   

    如何提取一个固定长度的字符串的单个字符,用什么函数??
    pos()
      

  5.   

    不好意思
    不是pos而是copy()
    对不起