Mehrere Objekte in einer Schleife erzeugen

[Touchdown]

Probleme beim Zugriff auf ein Objektes in der Liste?

Könnte so aussehen:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  liste : Tobjectlist;
  i : integer;
  AktuellesLVL : TLVL12;
begin
  for i := 0 to liste.Count -1 do
  begin
    AktuellesLVL := liste[i];
    if AktuellesLVL is TLVL12 then
    begin
      //
    end;
  end;
end;

Man könnte auch eine kleine Objektliste-Klasse bauen und eine eigene Get-Methode coden, aber das führt wohl zu weit.