Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.306 Beiträge
 
Delphi 12 Athens
 
#10

AW: Case-Anweisung - Zwingen alle Elemente des Typen auszuprogrammieren

  Alt 19. Nov 2024, 13:47
Das ist so aber auch schwer mitzubekommen,
bzw. es wird nicht lesbarer.
{$IF Ord(High(TEnum)) <> 1} {$MESSAGE Error 'peng'} {$IFEND}

array[TEnum] of ... = (...);
Hier bekommst du die Änderung der Anzahl mit.

Wenn jemand aber gleichzeitig etwas hinzufügt und löscht,
ohne dass es zwischendrin angepasst wurde,
dann flutscht das natürlich durch.
Ein Therapeut entspricht 1024 Gigapeut.
  Mit Zitat antworten Zitat