Question

Delphi 去除字符串中间空格？

我知道去除左右边空格，用Trim函数，但是去除中间空格不知道怎么做。请写出完整代码！

Answer 1

str:= StringReplace(str,' ','',[rfReplaceAll])
就可以了。

Answer 2

先定义一圆做个橘姿衡变量 即册消：
Var
sUser ID : string;
sUser ID := trim(editUser ID.Text);