Auswertungsreihenfolge von Ausdrücken oder so

[Rainer Wolff]

Wer kann mir das Verhalten meines Programms beschreiben:
Ich habe eine Liste von Objekten, aus denen ich eine gefilterte Liste (nach Stringvergleich) herausziehe.
In einem Unittest kontrolliere ich die Anzahl der gefilterten Elemente.
Wenn ich meine beiden Filter nacheinander auswerte und aufaddiere, komme ich auf den richtigen Wert.
Wenn ich die beiden Ausdrücke direkt addiere, erhalte ich ein falsches Ergebnis.

Meine beiden Filter haben 2 und 3 Elemente.
Je nach Reihenfolge erhalte ich bei der Aufsummierung 4 bzw. 6 Elemente, offensichtlich wird also immer die Elementanzahl des zuletzt gefilterten Ausdrucks verwendet und dann erst die Addition gemacht.

Wer kann erklären, warum das so ist?

Code:

  z240:=FTypList[0].FilteredEinzelschritte[gWkz.Werkzeug['Zurr_240']].Count;
  z840:=FTypList[0].FilteredEinzelschritte[gWkz.Werkzeug['Zurr_840']].Count;

  // Hier das falsche Ergebnis
  count:=FTypList[0].FilteredEinzelschritte[gWkz.Werkzeug['Zurr_240']].Count+
         FTypList[0].FilteredEinzelschritte[gWkz.Werkzeug['Zurr_840']].Count;

  count:=z240+z840;  // hier ist es die korrekte Summe
  assert.areEqual(FTypList[0].ZurrschienenList.Count, Count);

Code:

function TTyp.GetFilteredEinzelschrittlist(Filter: TWerkzeug): TEinzelSchrittlist;
var
  I, j: Integer;
begin
  FFilteredStanzprogramm.Clear;
  for I := 0 to GesamtSchrittlist.Count - 1 do
  begin
    for j := 0 to GesamtSchrittlist[i].EinzelschrittList.Count - 1 do
    begin
      if FGesamtSchrittlist[i].EinzelschrittList[j].Werkzeugname=Filter.Name then
        FFilteredStanzprogramm.Add(FGesamtSchrittlist[i].EinzelschrittList[j])
    end;
  end;

  result:=FFilteredStanzprogramm;
end;