正则表达式Options参数说明.docVIP

// preCaseLess: 不区分大小写, 相当于其他语言中的 i var reg: TPerlRegEx; begin reg := TPerlRegEx.Create(nil); reg.Subject := abc ABC aBc; reg.RegEx := abc; reg.Replacement := ◆; reg.Options := [preCaseLess]; //选项是集合类型的 reg.ReplaceAll; ShowMessage(reg.Subject); //返回: ◆ ◆ ◆ FreeAndNil(reg); end; -------------------------------------------------------------------------------- // preAnchored: 只匹配字符串开始, 相当于 ^, 不过还是有区别的 var reg: TPerlRegEx; begin reg := TPerlRegEx.Create(nil); reg.Subject := abc abc abc; reg.RegEx := abc; reg.Replacement := ◆; reg.Options := [preAnchored]; //指定: preAnchored reg.ReplaceAll; ShowMessage(reg.Subject); //返回: ◆ abc abc FreeAndNil(reg); end; {preAnchored 选项和 ^ 的区别: 1、任何情况下, preAnchored 只匹配字符串开头; 2、在 preMultiLine 选项模式下, ^ 还能匹配每行的开头; 3、^ 还有其他用途. } -------------------------------------------------------------------------------- // preDollarEndOnly: 让 $ 只匹配字符串结尾 var reg: TPerlRegEx; begin reg := TPerlRegEx.Create(nil); reg.Subject := abc abc abc#13#10 + abc abc abc#13#10 + abc abc abc; reg.RegEx := abc$; //当然需要有 $ reg.Replacement := ◆; reg.Options := [preDollarEndOnly]; //指定: preDollarEndOnly reg.ReplaceAll; ShowMessage(reg.Subject); {返回: abc abc abc abc abc abc abc abc ◆ } FreeAndNil(reg); end; -------------------------------------------------------------------------------- // preMultiLine: 多行匹配, 相当于其他语言中的 m var reg: TPerlRegEx; begin reg := TPerlRegEx.Create(nil); reg.Subject := abc abc abc#13#10 + abc abc abc#13#10 + abc abc abc; reg.RegEx := ^abc; reg.Replacement := ◆; reg.Options := [preMultiLine]; //指定: preMultiLine reg.ReplaceAll; ShowMessage(reg.Subject); {返回: ◆ abc abc ◆ abc abc ◆ abc abc } {如果不指定 preMultiLine 将返回: ◆ abc abc abc abc abc abc abc abc } FreeAndNil(reg); end; { 1、preMultiLine 是对 ^ 和 $ 的扩展使用; 2、在指定了 [preAnchored] 或 [preDollarEndOnly] 的情况下无效. } -------------------------