Ver si proceso es elevado

[Nipx4215]

Hola

Como podría implementar en un binario la funcion GetTokenInformation donde TOKEN_INFORMATION_CLASS sea 20, que corresponde a TokenElevation segun el MSDN
msdn.microsoft.com/en-us/library/windows/hardware/ff556838(v=vs.85).aspx

En palabras simples lo que quiero es ver si un proceso es elevado, solo eso.

Encontré un ejemplo acá, pero solo es .NET y me interesa en delphi
codeproject.com/Articles/66016/A-Quick-Start-Guide-of-Process-Mandatory-Level-Che

Pedí la ayuda a un compañero del foro, pero es posible que no haya tenido tiempo

Gracias