d正则表达式相关

Posted 2020-08-12 USEGEAR

控件看Delphi正则表达式使用方法（TPerlRegEx）的介绍；

使用正则表达式获取Sql查询语句各项(表名、字段、条件、排序)

 希望在线测试正则表达式  在线正则表达式测试 有许多常规表达式

希望通过sql语句get表名的表达式： \'\\s+from\\s+.*?(\\s+where\\s+|\\s+order\\s+|\\s+group\\s+)|\\s+from\\s+.+\'

如select * from table

  reg := TPerlRegEx.Create(nil);
  reg.Subject := \'select * from table\';
  reg.RegEx :=\'\\s+from\\s+.*?(\\s+where\\s+|\\s+order\\s+|\\s+group\\s+)|\\s+from\\s+.+\';
  while reg.MatchAgain do mysql := reg.SubExpressions[0];//输出结果：from table
  FreeAndNil(reg);