procedure TForm1.Button1Click(Sender: TObject);
var
  str1,str2:string;
begin
   str1:=edit1.Text;
   str2:=StringReplace ( str1, ' ', '', [rfReplaceAll] );
   label1.Caption:=str2;
end;
去除键盘输入的字符串中间的空格可以，从网页上复制的文本字符串中间的空格不行，为什么？谢谢！

但是用键盘修改后增加的空格可以，原本的和后来空格有什么不同？可是其它网页可以，就这个不行。

运　　费：
这个就不行。