Integer in Set laden

[samso]

In dem Augenblick in dem die Zahl in ein Set übertragen wurde, muss man gedanklich die Welt der Zahlen verlassen und in die Welt der Mengenlehre eintauchen. Hier wird nicht mehr mit Zahlen hantiert, sondern mit Elementbeziehungen. Das hier behandelte Beispiel ist geradezu ein Musterbeispiel für eine Menge. Die Menge der freigeschalteten Niveaus. Wenn die einzelnen Niveaus (Elemente der Menge) dann auch noch sinnvolle Namen bekommen, bildet die Programmiersprache wunderbar anschaulich ab was der Programmierer eigentlich will. Das ist dann fast schon Umgangssprache und genau das macht die Sache dann auch so sexy.

Richtig ist, dass die Zuweisung

Code:

Niveaus := TNiveauSet(Byte(StrToInt('57')));

nicht der reinen Lehre entspricht, weil diese Zuweisung implementationsabhängig ist. Sauberer wäre diese Formulierung:

Delphi-Quellcode:

function IntegerToNiveauSet(NiveauInt: Integer): NiveauSet;
var
  N: TNiveau;
  z: Integer;
begin
  z := 1;
  Result := [];
  for N := Low(TNiveau) to High(TNiveau) do
  begin
    if z and NiveauInt<>0 then
      include(Result, N);
    z := z * 2;
  end;
end;

Die Zuweisung lautet dann
Niveaus := IntegerToNiveauSet(StrToInt('57'));

[Rollo62]

Man könnte sich alternativ auch einen NiveauSet typ anlegen, der z.B. ein Byte ist,
und dann per record helper entsprechende Zugriffsfunktionen anlegen, die das sprachlich auch sehr anschaulich macht (und eventuell noch mehr bequeme Funktionen dazunehmen).
Wenn es im Wesentlichen um die sprachliche Erkennbarkeit geht.

[TiGü]

Wäre es nicht viel sinnvoller, nochmal über die Grundlagen von Bitfeldern/Bitmasken zu sprechen?

Denn hier hakt es gerade im Verständnis von DieDolly.

[freimatz]

Zitat von samso:

In dem Augenblick in dem die Zahl in ein Set übertragen wurde, muss man gedanklich die Welt der Zahlen verlassen und in die Welt der Mengenlehre eintauchen. Hier wird nicht mehr mit Zahlen hantiert, sondern mit Elementbeziehungen. Das hier behandelte Beispiel ist geradezu ein Musterbeispiel für eine Menge. Die Menge der freigeschalteten Niveaus.

Ich erlaube mir da einen kleinen Einwand. Für ein Musterbeispiel einer Menge stehen die Elemente der Menge in keiner Beziehung. Hier jedoch scheinen die Elemente eine bestimmte Reihenfolge zu haben. Auch der Name "Niveau" suggeriert das.

Ansonsten

[Michael II]

Ich würde das auch nie mit Mengen programmieren.
Da Dolly aber Mengen verwendet, könnte es sein, dass Dolly Mengen verwenden muss.

Da Dolly eine Zahl als Input erhält, nehme ich an, dass auch die Programmierin/der Programmierer des Inputs schlicht mit Bitmasken gearbeitet hat.

[Uwe Raabe]

Zitat von freimatz:

Für ein Musterbeispiel einer Menge stehen die Elemente der Menge in keiner Beziehung. Hier jedoch scheinen die Elemente eine bestimmte Reihenfolge zu haben. Auch der Name "Niveau" suggeriert das.

Allerdings deutet der Eingabewert 57 an, daß in diesem Fall nur die Niveaus 1, 4, 5 und 6 freigeschaltet sind. Insofern ist der Mengenansatz hier schon gerechtfertigt.

[Dennis07]

AN dieser Stelle möchte ich noch einmal auf die CustomSets-Library auf GitHub hinweisen, die das Erstellen von Sets aus jedem beliebigen (ordinalen Typen) erlaubt.

[Stevie]

Delphi-Quellcode:

uses
  TypInfo;

type
 TNiveau = (nA, nB, nC, nD, nE, nF);
 TNiveauSet = set of TNiveau;

var
  n: TNiveau;
  s: TNiveauSet;
begin
  Byte(s) := 57;

  for n := Low(TNiveau) to High(TNiveau) do
    if n in s then
      Write(GetEnumName(TypeInfo(TNiveau), Ord(n)), ' ');
end.