TRegEx.Matches verhält sich anders als gedacht

[Codehunter]

Hallo!

Ich habe einen String '3d 12h' (3 Tage, 12 Stunden), der eine Zeitspanne repräsentiert. Ich möchte mit TRegEx.Matches prüfen, ob der String das korrekte Format hat und gleichzeitig die beiden numerischen Teile extrahieren. Die Expression '^([0-9]{1,})d ([0-9]{1,2})h$' sollte eigentlich genau das tun laut Testtool (Bild 1). Mit dem folgenden Code kommt in Delphi aber was anderes heraus:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
const
  X = '3d 12h';
var
  Matches: TMatchCollection;
begin
  Matches := TRegEx.Matches(X, '^([0-9]{1,})d ([0-9]{1,2})h$');
end;

Zwar matcht die Expression wie gedacht und bringt auch drei Groups, jedoch enthalten alle drei Groups den identischen String '3d 12h' (siehe Bild 2). Wo ist da jetzt der Denkfehler?

Grüße
Cody

[Der schöne Günther]

Ich habe jetzt nicht in die Implementierung geschaut, aber zu dem Match gehört mehr als ein Verweis auf den String: Die beiden Zahlen davor sind wahrscheinlich die "von" und "bis"-Position in diesem String - Und die sehen für mich richtig aus.

Schau dir doch nicht die rohen Daten im Speicher an, sondern lass den Debugger Matches.Groups[1] und [2] ausgeben.

[Codehunter]

Stimmt, du hast recht. Der Denkfehler war, dass TRegEx.Matches den Inputstring gleich zerlegt und im Speicher ablegt. Aber das passiert erst wenn man durchiteriert:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
const
  X = '3d 12h';
var
  Matches: TMatchCollection;
  Match: TMatch;
  Group: TGroup;
  V: string;
begin
  Matches := TRegEx.Matches(X, '^([0-9]{1,})d ([0-9]{1,})h$');
  for Match in Matches do begin
    for Group in Match.Groups do begin
      V := Group.Value; // 1. Durchlauf = '3d 12h'   2. Durchlauf = '3'    3. Durchlauf = '12'
    end;
  end;
end;