Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi case ... of - Konstanten - Fehler (https://www.delphipraxis.net/20364-case-konstanten-fehler.html)

StefanDP 16. Apr 2004 16:21


case ... of - Konstanten - Fehler
 
Hi
folgender Code:

Code:
const
  LINKS: Byte = 1;
  RECHTS: Byte = 2
  ...

...

case Spieler.Richtung of    // Spieler Richtung ist vom Typ Byte
  1: mach das und das;
  2: mach das und das;
  ...
end;
funktioniert

nur will ich jetzt statt "1" "LINKS" eingeben (meine definierten Konstanten)
wie geht das?!

Code:
case Spieler.Richtung of
  LINKS: mach das und das;
  RECHTS: mach das und das;
  ...
end;´
geht nicht: Fehler: Main.pas(255): Konstantenausdruck erwartet

ich hoffe ihr könnt mir helfen

mfg
stefan

sakura 16. Apr 2004 16:24

Re: case ... of - Konstanten - Fehler
 
Lass das ": BYTE" raus ;)
Delphi-Quellcode:
const
  LINKS = 1;
  RECHTS = 2
...:cat:...

StefanDP 16. Apr 2004 16:41

Re: case ... of - Konstanten - Fehler
 
Zitat:

Zitat von sakura
Lass das ": BYTE" raus ;)
Delphi-Quellcode:
const
  LINKS = 1;
  RECHTS = 2
...:cat:...

coool!
danke

brauchen konstanten keine typenzuweisung, weil sie direkt vom compiler eingesetzt werden oder was?!

mfg
stefan

sakura 16. Apr 2004 16:50

Re: case ... of - Konstanten - Fehler
 
Zitat:

Zitat von StefanDP
brauchen konstanten keine typenzuweisung, weil sie direkt vom compiler eingesetzt werden oder was?!

Einerseits ist das der Grund. Andererseits war es früher (TPascal) mit diesen Zuweisungen vorinitialisierte Variablen zu definieren - inzwi. muß man dazu eine Compileroption ändern ;) Aber besser erst nicht machen, da das inzwischen als veraltet gilt-

...:cat:...

Pseudemys Nelsoni 16. Apr 2004 16:51

Re: case ... of - Konstanten - Fehler
 
das was du benutzt hattest war eine typisierte konstante...


Alle Zeitangaben in WEZ +1. Es ist jetzt 15:53 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz