关于中文空格？

Question

如何删除一个字符串中的中文空格，包括中间和两边的。

Answer 1

****Trim functionTrims leading and trailing spaces and control characters from a string.****TrimLeft functionTrims leading spaces and control characters from a string.****TrimRight functionTrims trailing spaces and control characters from a string.

Answer 2

我的函数
function convertstr(s : string) : string;
var
   i : integer;
begin
   for i := 1 to length(s) do
      if (s[i]=' ')then
         s[i] := ''
  Result:= s;
end; 
怎样？？

Answer 3

to 爱国人士:trim只能去掉英文空格！
to  upingking:s[i]是单字节，永远不可能等于一个中文空格（双字节）

Answer 4

转换成WideString，再逐个检查删除

Answer 5

我是抄别人的：
function TDataModule1.mtrim(s:string):string;
var
  sin,sout:string;
  i,k,len:word;
begin
  sin:=s;
  sout:=s;
  len:=length(sin);
  if len<>0 then
  begin
    k:=1;
    for i:=1 to len do
      if sin[i]<>' ' then
      begin
        sout[k]:=sin[i];
        k:=k+1;
      end;
    result:=copy(sout,1,k-1);
  end
  else  result:='';
end;