RSS订阅 | 匿名投稿
您的位置:网站首页 > 正则 > 正文

delphi 用正则表达式获取指定的字符串续取出所有符合要求的字符串

作者:admin 来源: 日期:2018/1/10 20:13:51 人气: 标签:

function GetNextMatch(AValue, APattern: string): string;

var

  i: Integer;

  Regex: TRegex;

  s: string;

begin

  Regex := TRegex.Create(APattern, [roIgnoreCase]);

  for i := 0 to Regex.Matches(AValue).Count -1 do

    begin

      Result := Regex.Matches(AValue).Item[i].Value;

      GetNextMatch(Result, APattern);

    end;

end;

调用 GetNextMatch('begindklewjsabegindiekdjekdenickdkekkdiuiuijujenddkeidkkdend', '(?<=begin)([.\S\s]*)(?=end)');

结果:

    dklewjsabegindiekdjekdenickdkekkdiuiuijujenddkeidkkd,

    diekdjekdenickdkekkdiuiuijuj

读完这篇文章后,您心情如何?
0
0
0
0
0
0
0
0
本文网址:
下一篇:没有资料