Delphi 正则表达式之TPerlRegEx 类的属性与方法(6): EscapeRegExChars 函数

// EscapeRegExChars 函数可以自动为特殊字符加转义符号 /
var
  reg: TPerlRegEx;
begin
  reg := TPerlRegEx .Create( nil);

  reg .Subject := 'C++Builer';
  reg .RegEx   := reg .EscapeRegExChars( 'C+') + ' {2}'; {相当于 'C/+{2} '}
  reg.Replacement := '◆';
  reg .ReplaceAll;

  ShowMessage(reg .Subject); {返回: ◆Builer}

  FreeAndNil(reg);
end;