Delphi 正则表达式.docx

Delphi 正则表达式语法(1): 关于大小写与中文//替换一般字符串var? reg: TPerlRegEx;begin? reg := TPerlRegEx.Create(nil);? reg.Subject := 我爱DELPHI, 但Delphi不爱我!;? reg.RegEx? := Delphi;? reg.Replacement := ◆;? reg.ReplaceAll;? ShowMessage(reg.Subject); //返回: 我爱DELPHI, 但◆不爱我!? FreeAndNil(reg);end;//不区分大小写var? reg: TPerlRegEx;begin? reg := TPerlRegEx.Create(nil);? reg.Subject := 我爱DELPHI, 但Delphi不爱我!;? reg.RegEx? := Delphi;? reg.Replacement := ◆;? reg.Options := [preCaseLess]; //不区分大小的设定, 默认是区分的? reg.ReplaceAll;? ShowMessage(reg.Subject); //返回: 我爱◆, 但◆不爱我!? FreeAndNil(reg);end;//试试中文替换var? reg: TPerlRegEx;begin? reg := TP