Wie kann ich die Anzahl der Elemente einer Variablen vom Typ set erhalten?

AFAIK gibt es dafür keine integrierte Funktion. Suche im Internet fand ich diese Funktion und es funktioniert für mich, aber ich bevorzuge es nicht benutze es seit der Montage und ich kann nicht verstehen was es macht. Also habe ich diese Funktion geschrieben, die auch funktioniert:

Nun möchte ich wissen, ob ich mich auf diese Funktion verlassen kann? Oder vielleicht gibt es einen Trick hinter dem gesetzten Datentyp und deshalb hat Delphi keine eingebaute Methode dafür.

Aber if meine Funktion ist zuverlässig then Wie kann ich es verbessern:

1. Übergeben Sie Konstanten an
2. Führen Sie eine Typprüfung durch und stellen Sie sicher, dass eine Menge an die Funktion
übergeben wird
3. Übergeben Sie den Wert anstelle seiner Adresse
4. Entfernen Sie SizeOfSet parameter

Ich möchte es wie Cardinality(AnySet) anstelle von Cardinality(@AnySet, SizeOf(TAnySet)) nennen.

Übrigens muss ich das sowohl in XE als auch in XE5 kompilieren.