Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.184 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.
$2B or not $2B
  Mit Zitat antworten Zitat