有没有一函授可以去掉字符串中的空格?

解决方案 »

  1.   

    StringReplace function
    也可以
      

  2.   

    Edit1.Text:=StringReplace(Edit1.Text,' ','',[rfReplaceAll, rfIgnoreCase]);
      

  3.   

    全部替换用stringreplace
    如果只要去掉头尾的用trim,这个函数可以处理widestring的
      

  4.   

    trim、trimleft、trimright,根据需求自己选择吧
      

  5.   

    StringReplace可以,trim、trimleft、trimright可以去掉前后的。
      

  6.   

    楼上几位说的不错,只用StringReplace 就可以,具体用法看帮助.
      

  7.   

    trim()    OK了    我来晚了不知道有没有分!
      

  8.   

    STR:=StringReplace(STR,' ','',[rfReplaceAll, rfIgnoreCase]);//去掉所有空格
    STR:=trim(STR);//去掉头尾空格
      

  9.   

    StringReplace可以,trim、trimleft、trimright可以去掉前后的。
      

  10.   

    额来自己写了
      while pos(' ',s) > 0 do
        s:=copy(s,1,pos(' ',s)-1)+ copy(s,pos(' ',s)+1 ,length(s));
      

  11.   

    uses StrUtils;var
      myStr:='AAA BBB c c dd dd d   ';
    begin
      myStr:=AnsiReplaceStr(myStr,' ','');
    end;
      

  12.   

    上面的返回值为 AAABBBccddddd
    应该满足楼主的要求了