StringReplace 替换 与 最新的TStringHelper.Replace 比较。

背景：原来要替换字符串 官方有StringReplace函数，后来官方引进了StringHelper帮助类，更加简化了字符串的替换操作。这里做个简单对比；

首先看下函数定义原型：

1.StringReplace函数原型

 

2.TStringHelper类里的原型：

 

 ======================================好了，接下来让我们弄个Demo对比下============================

 

procedure TForm4.Button1Click(Sender: TObject);
var
  s: string;
begin
  s := 'Aa aa aa AA';

  //StringReplace 必须有三个参数
  Memo1.Lines.Add(StringReplace(s, 'aa', 'b', [])); //区分大小写，只替换第一个匹配的

  Memo1.Lines.Add(StringReplace(s, 'aa', 'b', [rfReplaceAll])); //区分大小写，替换所有匹配的

  Memo1.Lines.Add(StringReplace(s, 'aa', 'b', [rfIgnoreCase])); //不区分大小写，只替换第一个匹配的

  Memo1.Lines.Add(StringReplace(s, 'aa', 'b', [rfReplaceAll,rfIgnoreCase])); //不区分大小写，替换所有匹配的

  Memo1.Lines.Add('---------------------');

  //TStringHelper的Replace 有多个重载.
  Memo1.Lines.Add(s.Replace('aa', 'b')); //区分大小写，替换所有匹配的（可见第三个参数默认是[rfReplaceAll]）

  Memo1.Lines.Add(s.Replace('aa', 'b', [])); //区分大小写，只替换第一个匹配的

  Memo1.Lines.Add(s.Replace('aa', 'b', [rfReplaceAll])); //区分大小写，替换所有匹配的

  Memo1.Lines.Add(s.Replace('aa', 'b', [rfIgnoreCase])); //不区分大小写，只替换第一个匹配的

  Memo1.Lines.Add(s.Replace('aa', 'b', [rfReplaceAll,rfIgnoreCase])); //不区分大小写，替换所有匹配的

end;