Dann verstehe ich euch tatsächlich nicht und verstehe auch grundsätzlich überhaupt nix mehr.
Wenn ich von Außen 57 lese dann bedeutet das Niveau 1, 4, 5 und 6 sind frei. 2 und 3 noch nicht.
Wie gestaltet sich dann die Abfrage?
Delphi-Quellcode:
if TNiveau.nB in NiveauInt then // das hier dürfe niemals zutreffen, da Niveau 2 (B) nicht freigeschaltet ist.
Include(NiveauSet, TNiveau.nB);
Aber da oben wird doch im Prinzip geprüft, ob die
1 in der
57 ist. Denn Element nB ist das zweite Element im Set mit dem Wert 1.
Aber eigentlich müsste ich
2 abfragen.
Ok ich glaube das wars ich gebe auf. Ich brauche diese Zahlen weil ich sonst keine Ahnung habe wie ich prüfen kann was frei ist und was nicht.
Man kann das natürlich auch ohne Sets umsetzen. Dann bekommt man auch die 32 zu sehen...
Delphi-Quellcode:
program Project1;
{$APPTYPE CONSOLE}
{$R *.res}
uses
System.SysUtils;
var
Niveaus: Integer;
i: Integer;
N: Integer;
begin
Niveaus := StrToInt('57');
N := 1;
for i := 1 to 6 do
begin
if N and Niveaus<>0 then
WriteLn(Format('Niveau %d ist freigeschaltet', [i]));
N := N * 2;
end;
ReadLn;
end.
Gerne liefere ich das auch in Assembler...