随笔 - 2146  文章 - 97 评论 - 11765 trackbacks - 253

举例:
var
  ss,s: string;
begin
  ss := '2007-2008';
  s := StringReplace(ss,'00','x',[rfReplaceAll]);
  ShowMessage(s);  //2x7-2x8

  s := StringReplace(ss,'00','x',[rfIgnoreCase]);
  ShowMessage(s);  //2x7-2008
end;

SysUtils 单元下的公用函数目录

posted on 2008-03-31 21:31  万一  阅读(...)  评论(... 编辑 收藏