Hallo, wieso führt die Verwendung der Konstante Zahl_Hundert in der Case-Struktur zu einem Fehler E2026 Konstantenausdruck erwartet? Der Bezeichner Zahl_Hundert ist doch als Konstante definiert!?

markieren

Delphi-Quellcode:

const
  Zahl_Hundert: Integer = 100;

case ANumber of
  Zahl_Hundert: TuHundert;
  101: TuHunderteins;
  103: TuHundertdrei;
end;

[Fehler]: E2026 Konstantenausdruck erwartet

Hi!

Afair ist

markieren

Delphi-Quellcode:

const
  Zahl_Hundert: Integer = 100;

keine echte Konstante.

Versuche es mal mit

markieren

Delphi-Quellcode:

const
  Zahl_Hundert = 100;

Liebe Grüße,
Frederic

Vielen Dank für den Hinweis - es geht wirklich!!! Wieso ist Zahl_Hundert: Integer = 100; keine Konstante, wenn sie unter const geschrieben ist?? Ich habe Konstanten immer so definiert.

Wenn ich Zahl_Hundert: Integer = 100; unter const definiere und danach versuche, dem Ausdruck Zahl_Hundert einen anderen Wert zuzuweisen, so entsteht ein Fehler. Also muss das doch auch eine Konstante sein!

Ich wusste nicht, dass es in Delphi offensichtlich zwei Typen von Konstanten gibt!?

Kann hier jemand etwas Licht ins Dunkel bringen?

Es handelt sich dabei nur um eine schreibgeschützte Variable, die durchaus noch verändert werden kann.

PS: sowas wurde auch schon mehrmals beantwortet, aber ich geb's zu, es ist nicht "leicht" zu finden und manchmal sogar etwas ausführlicher. (auch wenn ich grad leider das "beste" Thema dazu grade nicht finde) na gut, eines war doch zu finden
http://www.delphipraxis.net/152314-u...klaration.html

[edit]
und vorallem
http://www.delphipraxis.net/152845-const-record.html

Danke für die Hinweise. Ich hatte immer die relativ strenge Typisierung von Delphi im Hinterkopf - aber es ist ja auch wieder logisch, dass bei einer Wertzuweisung in der Konstanten-Deklaration eine Angabe des Wertebereiches unnötig ist. Und außerdem bin ich davon ausgegangen, dass alles, was unter const deklariert wird, auch automatisch eine Konstante ist.

Nur: Hat die Unterscheidung zwischen "echten Konstanten" und "schreibgeschützten Variablen" einen praktischen Grund oder Sinn - d.h. gibt es Anwendungsfälle, wo einmal die Verwendung von "echten Konstanten" und dann wieder die Anwendung von "schreibgeschützten Variablen" angebracht ist? Oder anders ausgedrückt: Was hat Borland (?) sich dabei gedacht, als es diese Unterscheidung einführte?

Toll finde ich übrigens auch diese Konstanten-Anwendung, bei der die Klasse nicht instantiiert werden muss, um sie zu benutzen:

markieren

Code:

type
  TClassWithConstant = class
    public
      const SomeConst = 'This is a class constant';
  end;         

procedure TForm1.FormCreate(Sender: TObject);
begin
  ShowMessage(TClassWithConstant.SomeConst);
end;