Wie umschreibe ich "For N in P" für alte Delphi's ?

[Stevie]

Delphi-Quellcode:

var
  e: enumerator;
  v: value;
begin
  e := list.getenumerator;
  while e.movenext do
  begin
    v := e.getvalue;
    // mach was mit v
  end;

ggf noch in nen try finally drumrum, je nachdem, was enumerator fürn typ ist - damit dann noch ein Free folgt.