reg: TPerlRegEx;

  reg := TPerlRegEx.Create();

  reg.Subject := ;
  reg.RegEx   := ;   reg.Replacement := ;
  reg.ReplaceAll;

  ShowMessage(reg.Subject); 
  FreeAndNil(reg);
;

  reg: TPerlRegEx;

  reg := TPerlRegEx.Create();

  reg.Subject := ;
  reg.RegEx   := ;   reg.Replacement := ;
  reg.ReplaceAll;

  ShowMessage(reg.Subject); 
  FreeAndNil(reg);
;


 贪婪匹配  非贪婪匹配 
描述
???0 个或 1 个
++?1 个或多个
**?0 个或多个
{n}{n}?n 个
{n,m}{n,m}?n - m 个
{n,}{n,}?n 个或多个