Einzelnen Beitrag anzeigen

DieDolly

Registriert seit: 22. Jun 2018
2.175 Beiträge
 
#1

Integer in Set laden

  Alt 16. Okt 2019, 17:36
Ich habe diese Deklarationen
Delphi-Quellcode:
type
 TNiveau = (nA = 1, nB = 2, nC = 4, nC = 8, nD = 16, nE = 32);
 TNiveauSet = set of TNiveau;
In einer Procedure lade ich einen Integerwert aus einer Datei der zum Beispiel 57 sein kann in eine Variable NiveauInt.
Mit sowas hier gucke ich, welches Niveau im Set enthalten ist (insgesamt 6x)
Delphi-Quellcode:
if TNiveau.nA in NiveauInt then
 Include(NiveauSet, TNiveau.nA);
Das Problem ist, dass ich die 57 nicht in die Variable NiveauInt geladen bekomme.
Mein Versuch NiveauInt := TNiveauSet(Byte(57)); Egal von welchem Typ NiveauInt ist, es klappt nicht. Was mache ich falsch?
  Mit Zitat antworten Zitat