Das gibts auch in neueren Delphi-Versionen, dort nennt sich das ganze for in.
Ist im Prinzip eine Schleife, die für jedes Element der übergebenen Liste den Schleifenrumpf ausführt.
Konkret spart Dir "for each variablenname in Liste" diesen Code:
Delphi-Quellcode:
var tmpItem: myType; // Typ der Items von Denomtype
for i := 0 to Length(DenomType) -1 do
begin
tmpItem := DenomType[i];
end;