|
Registriert seit: 13. Dez 2018
66 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.
|