Anzahl Elemente in "set of"

**himitsu**

Beim Casten mußt du einfach nur einen Typen gleicher Größe haben ... also einem, der dann SizeOf(TFontStyles) entspricht.

das kann auch ein Record oder StaticArray sein.

markieren

Delphi-Quellcode:

			Type T = Array[0..31] of Byte;

  P = ^T;

Count := 0;

For i := 0 to SizeOf(Typ) do

  Count := Count + ZähleBitsInByte(P(@TypVar)[i]);

**Satty67**

Ja, mit einem Array of Byte geht es.

Aber wird dann wohl nicht wie erhofft einfacher auf die Werte zuzugreifen. Gesetzte Bit's müssen ja immer noch gezählt werden.

Zitat von Satty67:

Ja, mit einem Array of Byte geht es.

Aber wird dann wohl nicht wie erhofft einfacher auf die Werte zuzugreifen. Gesetzte Bit's müssen ja immer noch gezählt werden.

Und das geht hervorragend mit der Funktion aus Post #10

Anzahl Elemente in "set of"

Re: Anzahl Elemente in "set of"

Re: Anzahl Elemente in "set of"

Re: Anzahl Elemente in "set of"

Forumregeln

Satty67 Registriert seit: 24. Feb 2007 Ort: Baden 1.566 Beiträge Delphi 2007 Professional	#22 Re: Anzahl Elemente in "set of" 9. Apr 2009, 22:42 Ja, mit einem Array of Byte geht es. Aber wird dann wohl nicht wie erhofft einfacher auf die Werte zuzugreifen. Gesetzte Bit's müssen ja immer noch gezählt werden.
	Zitat

DevilsCamp (Gast) n/a Beiträge	#23 Re: Anzahl Elemente in "set of" 9. Apr 2009, 23:40 Zitat von Satty67: Ja, mit einem Array of Byte geht es. Aber wird dann wohl nicht wie erhofft einfacher auf die Werte zuzugreifen. Gesetzte Bit's müssen ja immer noch gezählt werden. Und das geht hervorragend mit der Funktion aus Post #10
	Zitat