让delphi支持正则表达式的一个单元文件,有demo和帮助文档