精华区 [关闭][返回]

当前位置:网易精华区>>讨论区精华>>编程开发>>● Delphi>>Object Pascal语言>>去掉字符串中的所有空格

主题:去掉字符串中的所有空格
发信人: soaringbird(假行僧*飞翔鸟)
整理人: soaringbird(2002-01-31 12:29:10), 站内信件
Delphi:
function TrimAll(const S: string): string;
begin
  Result := StringReplace(S,' ','',[rfReplaceAll]);
end;

BCB:
AnsiString __fastcall TrimAll(const AnsiString S)
{
    TReplaceFlags rf;
    rf << rfReplaceAll;
return StringReplace(S," ","",rf);
}


----
我强烈地憎恨所有的日本鬼子,我强烈地厌恶所有的哈日族分子!
打倒日本帝国主义!

[关闭][返回]