Как извлечь SID компьютера/машины?

Я ищу способ извлечения SID компьютера с помощью кода Delphi. Есть инструмент PsGetSid от SysInternals, который делает это, но я не могу использовать его в своем приложении. Я искал пример кода в Google и не смог его найти.

Как я могу добиться этого в Delphi?

Пожалуйста, помогите.