Delphi Prüfen ob ein Integerwert in einem ENUM existiert

Thema durchsuchen

Ansicht

Themen-Optionen

Prüfen ob ein Integerwert in einem ENUM existiert

Ein Thema von DR_Oetker · begonnen am 17. Feb 2021 · letzter Beitrag vom 18. Feb 2021

Vorheriger Beitrag

Nächster Beitrag

DenkDirNix

Registriert seit: 13. Dez 2018
73 Beiträge

Delphi 11 Alexandria

AW: Prüfen ob ein Integerwert in einem ENUM existiert

18. Feb 2021, 07:12

Du bist mit dem von Dir vorgeschlagenen Code schon auf dem richtigen Weg. Nur, dass Du Dir für den IN-Operator zusätzlich noch einen SET bauen (und bei Erweiterungen pflegen) musst:

OrderFieldSet: set of TOrderField = [ofBelegnummer, ofBelegdatum, ofKonto, ofKontoName, ofBank, ofZahldatum]

Jetzt kann eine FOR-Schleife von low( tOrderfield ) bis high( tOrderfield ) laufen und mit IN prüfen.
Falls Start bei 0 gebraucht wird, muss noch ein Dummy mit Wert 0 eingefügt werden.