摘要: //字符串分割: Split var reg: TPerlRegEx; List: TStrings; begin List := TStringList.Create; reg := TPerlRegEx.Create(nil); reg.Subject := 'aaa,bbb,ccc,ddd'; reg.RegEx := ','; {这里可是运行相当复杂的分割符... 阅读全文
posted @ 2007-12-24 22:01 万一 阅读(7994) 评论(15) 推荐(0)
摘要: // EscapeRegExChars 函数可以自动为特殊字符加转义符号 \ var reg: TPerlRegEx; begin reg := TPerlRegEx.Create(nil); reg.Subject := 'C++Builer'; reg.RegEx := reg.EscapeRegExChars('C+') + '{2}'; {相当于 'C\+{2}'}... 阅读全文
posted @ 2007-12-24 20:56 万一 阅读(5110) 评论(0) 推荐(0)
摘要: // Compile、Study var reg: TPerlRegEx; begin reg := TPerlRegEx.Create(nil); reg.RegEx := 'ab'; reg.Options := [preCaseLess]; reg.Compile; {编译表达式} reg.Study; {Study 方法会检查是否编译, 如果没有编译则执行 ... 阅读全文
posted @ 2007-12-24 18:29 万一 阅读(4999) 评论(0) 推荐(0)
摘要: // Replace var reg: TPerlRegEx; begin reg := TPerlRegEx.Create(nil); reg.RegEx := 'ab'; reg.Replacement := '◆'; reg.Subject := 'ababab'; reg.ReplaceAll; ShowMessage(reg.Subject); //... 阅读全文
posted @ 2007-12-24 18:21 万一 阅读(6228) 评论(0) 推荐(0)
摘要: //设定搜索范围: Start、Stop var reg: TPerlRegEx; begin reg := TPerlRegEx.Create(nil); reg.Subject := 'ababab'; reg.RegEx := 'ab'; reg.Replacement := '◆'; reg.Start := 1; reg.Stop := 2; w... 阅读全文
posted @ 2007-12-24 03:29 万一 阅读(5383) 评论(0) 推荐(0)