Probleme mit gepostetem code

[TurboMagic]

Hallo,

eigentlich gehört mein Beitrag hier dazu:
https://www.delphipraxis.net/23936-d...istrieren.html
aber dort kann ich aus mir nicht ganz verständlichen Gründe nichts posten. Es kommt immer eine Fehlermeldung und die aufgeführten Gründe sind entweder
zu unspeziefisch oder treffen nicht zu (mein Benutzerkonto hier ist ja offensichtlich aktiviert...).

Aber warum wollte ich dort Posten?
Weil ich beim Ausführen der als tfiletyperegistration.zip dort verlinkten Demo einen Crash in function IsAdmin: LongBool; bekomme.
Der Crash passiert bei mir in Zeile 53, beim 2. Durchlauf der Schleife:

if EqualSid(TokenInformation^.Groups[Loop].Sid, AdminSid) then

Es ist ein bereichsüberlauf und da in D11.2 die Überlaufsprüfung standardmäßig an ist, hab' ich die mal ausgeschaltet.
Aber: ändert nix.

Hat da irgendjemand weitere Infos für mich?