Du könntest dir auch eine Registrierungsdatei bauen und diese dann mit erhöhten Privilegien ausführen, funktioniert einwandfrei.
Code:
Windows Registry Editor Version 5.00
[HKEY_LOCAL_MACHINE\SOFTWARE]
"Test"="0001"
Code:
ShellExecute(Application.Handle, 'runas', 'cmd.exe', '/c test.reg', nil, SW_SHOWNORMAL)