TPerlRegex sehr langsam

[s.h.a.r.k]

Hallo,

geh mal auf Nummer sicher und teste die Geschwindigkeit wie folgt:

Delphi-Quellcode:

var
  blub : Int64;
begin
{... }
blub := GetTickCount();
Result := Match;
if Result then
  repeat
    //sl.Add(MatchedExpression);
  until not MatchAgain;
blub := GetTickCount() - blub;
ShowMessage(IntToStr(blub) + ' Millisekunden);

Ansonsten kannst auch mal die Lib testen: http://www.regular-expressions.info/delphi.html