Delphi中正则表达式入门

Delphi中正则表达式入门2012-12-20 万一在 Delphi 中使用正则表达式, 目前 PerlRegEx 应该是首选, 准备彻底而细致地研究它.

官方网站: http://www.regular-expressions.info/delphi.html

直接下载: http://www.regular- expressions.info/download/TPerlRegEx.zip

安装方法:

1、先把解压的 TPerlRegEx 文件夹放一个合适的地方, 我放在了 Delphi 的 Imports 目录中.

2、目前最新 For Win32 的版本是对 Delphi 2006 的, 2007 也能用.

打开 PerlRegExD2006.dpk, 提示缺少资源文件, 没关系;

在 Project Manager 窗口中的 PerlRegExD2006.bpl 上点击右键, 执行 Install;

这时在 Tool Palette 的列表中已经有了 TPerlRegEx, 在 JGsoft 组.

3、Tools -> Options -> Environment Options -> Delphi Options -> Library-Win32 -> Library path ->

添加路径: ...ImportsTPerlRegEx

4、可以使用了！直接 uses PerlRegEx 或从 Tool Palette 添加都可以.

如果不喜欢 Tool Palette 的添加方式可以省略第二步.

计划的学习步骤: 1、正则语法; 2、TPerlRegEx 功能.

//先测试一下:
uses
 PerlRegEx; //uses 正则表达式单元
procedure TForm1.FormCreate（Sender: TObject）;
var
 reg: TPerlRegEx; //声明正则表达式变量
begin
 reg := TPerlRegEx.Create（nil）; //建立
 reg.Subject := "sSsS";  //这是要替换的源字符串
 reg.RegEx  := "s";    //这是表达式, 在这里是准备替换掉的子串
 reg.Replacement := "◆"; //要替换成的新串
 reg.ReplaceAll;      //执行全部替换 ---www.bianceng.cn
 ShowMessage（reg.Subject）; //返回替换结果: ◆S◆S
 FreeAndNil（reg）; //或 reg.Free
end;