TPerlRegEx正则表达式
比regexpr好用,支持中文识别,识别中文时转化为UTF8字符串,如下面delphi7示例代码: function CheckResultInfo(const Info, RegxExpr: string; var RetInfo: string): Boolean; var reg: TPerlRegEx; Subject, RegEx: PCREString; begin RetInfo := ''; Result := false; Subject := AnsiToUtf8(Info); RegEx := AnsiToUtf8(RegxExpr); reg := TPerlRegEx.Create(nil); try reg.Subject := Subject; reg.RegEx := RegEx; if reg.Match then begin end; finally reg.Free; end; end; XE2下需包含AnsiStrings.pas 中文识别说明: 因为不支持[\u4e00-\u9fa5]这样的表达,直接写字符,“u4e 00”对应一,“u9fa5”对应“龥”,“[一-龥]”作为正则串就可以识别中文了
下载地址
用户评论
很好的正则应用控件