Debugger zeigt Inhalt von TObjektList nicht an!?

[Yheeky]

Hi,

ich habe gerade ein wenig mit dem Debugger rumgespielt. Ich habe eine TObjectlist und mehrere TObject Objekte. Ich habe einen Breakpoint gesetzt und wollte mir die Einträge in der Objectlist anschauen, allerdings bekomme ich nur ein () angezeigt (s. Screenshot).
Wieso werden mir nicht die einzelnen Objekte in der Liste angezeigt? Wenn ich auf ein einzelnen Objekt gehe, werden mir auch die Eigenschaften "Namen und ID" angezeigt.

Hier mein Code:

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Contnrs, StdCtrls;

type
  TObjekt = class(TObject)
    Namen : String;
    ID : Integer;
  end;

type
  TObjektliste = class(TObjectlist)
  end;

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
    procedure FormCreate(Sender: TObject);
  private
    Objektliste : TObjektliste;
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var neuesObjekt : TObjekt;
begin
  neuesObjekt := TObjekt.Create;
  neuesObjekt.Namen := 'Tisch';
  neuesObjekt.ID := 1;
  Objektliste.Add(neuesObjekt);

  neuesObjekt := TObjekt.Create;
  neuesObjekt.Namen := 'Teller';
  neuesObjekt.ID := 2;
  Objektliste.Add(neuesObjekt);

  neuesObjekt := TObjekt.Create;
  neuesObjekt.Namen := 'Löffel';
  neuesObjekt.ID := 3;
  Objektliste.Add(neuesObjekt);

  neuesObjekt := TObjekt.Create;
  neuesObjekt.Namen := 'Gabel';
  neuesObjekt.ID := 4;
  Objektliste.Add(neuesObjekt);

end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  Objektliste := TObjektliste.Create;
end;

end.