Anzahl Elemente in "set of"

[webcss]

evtl. ist RTTI Dein Freund:

Delphi-Quellcode:

function CountElements(ATypeAddress: pointer): integer;
var
  lTypeData: PTypeData;
begin
  lTypeData:= GetTypeData(ATypeAddress);
  Result := lTypeData^.MaxValue;
end;

Der Aufruf dann:
myNumerousElements:= CountElements(TypInfo(TFontStyle));