Anzahl der Elemente in einem Set ermitteln?

[Dennis07]

Wenn du die Lina Components Library hast, dann gibt es da in der uSysTools.pas -Unit auch die Funktionen:

Delphi-Quellcode:

function Count(Elements: TByteSet): Byte; overload;
function Count(Elements: TCharSet): Byte; overload;

Diese können zumindest Byte-und Charsets zählen. Ansonsten kannst du natürlich problemlos entweder eine for -in -Schleife oder aber eine Bitzählung benutzen, wie auch weiter oben schon vorgeschlagen wurde.