文档章节

RegularExpressions(5) RegularExpressions 成员(二) IRegex

涂孟超
 涂孟超
发布于 2014/09/26 15:35
字数 577
阅读 2
收藏 0

//IRegex 的属性与方法 
IRegex.GetGroupNames;         { 子表达式编号数组, 譬如有两个子表达式, 会得到 0,1,2; 这基本无用 }
IRegex.GetGroupNumbers;       { 同上, 只是获取的是整数数组 }
IRegex.GroupNameFromNumber(); { 应该是从子表达式编号获取子表达式的名称; 但没有实现, 来回都是编号 }
IRegex.GroupNumberFromName(); { 同上一个是反着的; 基本都无用 }
IRegex.IsMatch();             { 判断是否有所匹配; 如果只想知道是否匹配到, 用它应该最快 }
IRegex.Match();               { 获取一个 IMatch 对象, 这是第一个匹配结果 }
IRegex.Matches();             { 获取一个 IMatchCollection 对象; 这是匹配到的 IMatch 的集合 }
IRegex.Replace();             { 替换 }
IRegex.Split();               { 根据表达式分割字符串; 当前版本没有实现好, 暂时无用 }
IRegex.ToString;              { 获取表达式文本 }
IRegex.Save();                { 把表达式保存到流 }
IRegex.Load();                { 从流中取回由 Save 保存的表达式 }
IRegex.Options;               { 选项集合, 是只读的; 要设置只能从 Create 方法中 }
{这其中需要重新看看的只有 Replace}

//IRegex 是通过 TRegex 实现的, TRegex 还有下面几个静态类方法:
TRegex.Escape();    { 编码需要转义的字符 }
TRegex.Unescape();  { 还原 Escape 的编码 }
TRegex.IsMatch();   { 同 IRegex.IsMatch }
TRegex.Match();     { 同 IRegex.Match }
TRegex.Matches();   { 同 IRegex.Matches }
TRegex.Replace();   { 同 IRegex.Replace }
TRegex.Split();     { 同 IRegex.Split }
{ 使用这些个类方法会让代码更简单 }

 
 
 
 
 

 

 

  

下面是使用类方法简化程序的例子:
uses RegularExpressions;

procedure TForm1.FormCreate(Sender: TObject);
var
  Match: IMatch;
  MatchCollection: IMatchCollection;
  Pattern, Input, str: string;
begin
  Pattern := '([A-Za-z]+)(\d+)';
  Input := 'AAA1 BBB2 AA11 BB22 A111 B222 AAAA';

  //
  Match := TRegex.Match(Input, Pattern);
  ShowMessage(Match.Value); { AAA1 }

  //
  MatchCollection := TRegex.Matches(Input, Pattern);
  ShowMessage(IntToStr(MatchCollection.Count)); { 4 }
  
  //
  str := TRegex.Replace(Input, Pattern, '◆');
  ShowMessage(str); { ◆ ◆ ◆ ◆ ◆ ◆ AAAA }
end;

 
 
 
 
 

 

 

  

Escape 与 Unescape 测试:
uses RegularExpressions;

procedure TForm1.FormCreate(Sender: TObject);
var
  str: string;
begin
  str := TRegex.Escape('.$^{[(|)*+?\');
  ShowMessage(str);  (* \.\$\^\{\[\(\|\)\*\+\?\\ *)
  str := TRegex.Unescape(str);
  ShowMessage(str);  (* .$^{[(|)*+?\ *)
end;

 
 
 
 
 

 

 

  

Replace 函数有很多重载, 如:
uses RegularExpressions;

procedure TForm1.FormCreate(Sender: TObject);
var
  Regex: IRegex;
  Match: IMatch;
  Pattern, Input, str: string;
begin
  Pattern := '([A-Za-z]+)(\d+)';
  Input := 'AAA1 BBB2 AA11 BB22 A111 B222 AAAA';
  Regex := TRegex.Create(Pattern);

  { 替换全部 }
  str := Regex.Replace(Input, '◆'); 
  ShowMessage(str); { ◆ ◆ ◆ ◆ ◆ ◆ AAAA }

  { 只替换前两个匹配 }
  str := Regex.Replace(Input, '◆', 2);
  ShowMessage(str); { ◆ ◆ AA11 BB22 A111 B222 AAAA } 

  { 从第 10 个字符开始, 只替换两个匹配 }
  str := Regex.Replace(Input, '◆', 2, 10);
  ShowMessage(str); { AAA1 BBB2 ◆ ◆ A111 B222 AAAA } 
end;

 
 
 
 
 

 

 

  

Replace 函数中还应该有一个 TMatchEvaluator 事件参数, 它可以执行一些更高级的替换, 遗憾的是当前版本也没有实现.

尽管有不少东西还没实现, 但试用下来感觉还是蛮不错的, 可以放弃 PerlRegEx 了!

本文转载自:http://www.cnblogs.com/del/archive/2010/01/07/1641162.html

共有 人打赏支持
涂孟超
粉丝 12
博文 2011
码字总数 14107
作品 0
深圳
程序员
私信 提问
正则表达式的初体验:分析字符串数据

在程序中,对于数据的分析是非常重要及常见的。对于字符串数据的分析,往往就是对字符串的内容提取,捕获和替换。除非你要做的分析是简单的要求,否则你就不要再使用string的IndexOf、LastI...

彭博
2012/03/09
71
0
winform联网查询

using System; using System.Collections.Generic; using System.Text; using System.Data; using System.Windows.Forms; using System.Data.OleDb; using System.IO; using System.Net; usi......

宇不会停
2013/11/22
179
0
c#中分割字符串的几种方法

最近经常看到论坛中许多帖子询问如何使用split来分割字符串,我这里对split做一些简单的总结,希望能够对大家有所帮助。下面介绍几种方法: 第一种方法:打开vs.net新建一个控制台项目。然后...

晨曦之光
2012/03/09
18
0
c#判断输入文字是否是数字

c#判断输入文字是否是数字 方案一: /**//// /// 名称:IsNumberic /// 功能:判断输入的是否是数字 /// 参数:string oText:源文本 /// 返回值: bool true:是 false:否 /// public bool Is...

长平狐
2013/01/06
4.8K
0

没有更多内容

加载失败,请刷新页面

加载更多

mysql load data 批量导入使用

最近在研究使用mycat,其中有使用批量数据导入,简单记录一下使用方式。 查看系统属性 mysql>show variables like '%secure%'+--------------------------+-----------------------+| Vari...

FansinZhao
25分钟前
1
0
浅谈React的最大亮点——虚拟DOM

在Web开发中,需要将数据的变化实时反映到UI上,这时就需要对DOM进行操作,但是复杂或频繁的DOM操作通常是性能瓶颈产生的原因,为此,React引入了虚拟DOM(Virtual DOM)的机制。 一、什么是...

peakedness丶
28分钟前
0
0
下一代大数据处理引擎,阿里云实时计算独享模式重磅发布

摘要: 11月14日,阿里云重磅发布了实时计算独享模式,即用户独享一部分物理资源,这部分资源在网络/磁盘/CPU/内存等资源上跟其他用户完全独立,是实时计算在原有共享模式基础上的重大升级。...

阿里云官方博客
33分钟前
1
0
Spring MVC 测试样例

1、需要javax.servlet-api V3.0以上支持 <!--3.0以上版本--> <dependency> <groupId>javax.servlet</groupId> <artifactId>javax.servlet-......

jcc_codingBoy
35分钟前
3
0
kettle增量同步oracle数据到mysql

kettle增量同步oracle数据到mysql 适合表中有更新时间的字段 kettle安装 绿色,下载后解压即可(略), -> Download 连接数据库 需要导入jdbc相关驱动jar包到lib目录(oracle、mysql对应jar...

o00o
40分钟前
6
0

没有更多内容

加载失败,请刷新页面

加载更多

返回顶部
顶部