Das IF liegt aber nicht direkt in der Schleife, sondern in dem IF.
Delphi-Quellcode:
For I := 0 to EineListe.Count - 1 do
begin
...
Exit(...);
end;
Und was sagst du dazu?
PS: Sowas ist oben in den beiden drei verschachtelten Schleifen auch drin, die Mittlere wird niemals durchlaufen, da sie anscheinend (falls ich das richtig seh) immer gleich im ersten Durchgang abgebrochen wird.