发信人: 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);
}
---- 我强烈地憎恨所有的日本鬼子,我强烈地厌恶所有的哈日族分子!
打倒日本帝国主义! |
|