Undeklarierter Bezeichner bei Konstantendeklaration

[Codehunter]

Moin!

Heute zum Einstieg mal eine kurze und ganz blöde Frage: Wieso das denn?

Delphi-Quellcode:

type
  TPageMain = (pmWelcome, pmSettings);

  TfrmMain = class(TForm)
    pagWillkommen: TTabItem;
    pagEinstellungen: TTabItem;
  public const
    PG_MAIN: array[TPageMain] of TTabItem = (pagWillkommen, pagEinstellungen); // <-- Undeklarierter Bezeichner 'pagWillkommen'
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  frmMain: TfrmMain;

Grüße
Cody

[Der schöne Günther]

Weil eine Konstante in Delphi für alle Instanzen der Klasse gleich ist. Die Referenzen pagWillkommen und pagEinstellungen sind aber bei jedem Objekt individuell.

[DieDolly]

Mich interessiert auch, warum das nicht funktioniert.
Kannst du das mit gleich und individuell auch so erklären, dass normale Leute es verstehen?

[himitsu]

pagWillkommen existiert "jetzt" noch nicht, da es erst im Zusammenhang mit einer späteren Objektinstanz verfügbar ist.

In diesem Fall is wohl ein Arrayproperty sinnvoller, welches zur Laufzeit über dessen Getter auf die gewünschten Instanzen liefert.

Delphi-Quellcode:

function GetPgMain(Index: TPageMain): TTabItem;
property PG_MAIN[Index: TPageMain] read GetPgMain;

Oder halt direkt diese Funktion.

const , class var und class function ist global und kann nicht auf irgendwas der Instanz(en) zugreifen.