Konstanten-Blues

[Frickler]

Hallo,

ich arbeite mit Delphi 5. Ist es in neueren Versionen möglich, konstante Arrays zu definieren, die keine typisierten, sondern "echte" Konstanten sind? Bei D5 geht das definitiv nicht:

Delphi-Quellcode:

type TArry = array [1..3] of integer;

const Arry : TArry = (23, 42, 99);

// das geht leider nicht (egal ob $J+ oder $J-)
const test1 = Arry[2];

// und auch dies geht nicht (egal ob $J+ oder $J-)
const test2 : integer = Arry[2];

Darüber stolper ich leider immer wieder...

[sirius]

Nö das geht auch nicht. Wie soll den sowas compiliert werden?

Edit: Was du probieren kannst, ist das:
const test2 : pinteger = @Arry[2];

[xy124]

bei meinem D7 geht's auch nicht

[Frickler]

@sirius: wäre Arry eine echte Konstante, so wäre Arry[2] ein konstanter Ausdruck.

Delphi-Quellcode:

// das funktioniert...
const test2 : pinteger = @Arry[2];

// ...aber ich müsste dann im Code überall...
x := test2;     // ...durch...
x := test2^;    // ...ersetzen.

Aber dass Arraykonstanten nicht echt konstant sind, hat mich eh immer gestört. Hier wird das Konstantenkonzept unterlaufen, und 'tolle' Dinge wie

Delphi-Quellcode:

const JaNein : array [false..true] of string = ('Nein','Ja');

...

JaNein[true] := 'vielleicht';

sind problemlos möglich. Solche Fehler sind. ggfs. sehr schwer zu finden.

[sirius]

Die Dinge sollen ja auch möglich sein. Was ist daran ein Fehler?
Denn ich kann ja auch "JaNein[checkbox1.checked]" eintragen. Und hier funktioniert es eben nur so, dass der Wert (bei Strings ist es ja eh wieder anders als bei Integer) irgendwo im speicher abrufbereit stehen muss, wären Integer Konstanten auch mal direkt im Code ersetzt werden.