Verglaich Java - Delphi Iteratoren

[Luckie]

Also das ist dann wohl eher geschmacksache:

Code:

   private void ausgabe(ArrayList kunden)
   {
      ListIterator iterKunden = kunden.listIterator();
      while (iterKunden.hasNext())
      {
         Kunde k = (Kunde)iterKunden.next();
         System.out.println(k.getName() + ", " + k.getVorname());
         ListIterator iterKonten = k.getKonten().listIterator();
         while (iterKonten.hasNext())
         {
            Konto ko = (Konto)iterKonten.next();
            System.out.println(ko.getBezeichnung() + ": " + ko.getSaldo());
         }
         System.out.println("");
      }
   }

Delphi-Quellcode:

procedure TForm1.UpdateKonten(Kunde: TBankKunde);
var
  Konto             : TBankKonto;
  i                 : Integer;
begin
  Listbox2.Clear;
  if Assigned(Kunde) then
  begin
    for i := 0 to Kunde.GetKontenCount - 1 do
    begin
      Konto := Kunde.GetKonto(i);
      Listbox2.Items.Add(IntToStr(Konto.KontoNummer)+ ': ' + IntToStr(Konto.Saldo) + ' Euro');
    end;
  end;
end;

In Java muss ich erst noch einen ListIterator erzeugen und in der Schleife das zurückgegeben Objekt casten.