Winapi how to install run as administrator?

Question

Delphi

Each executable file can be set in the properties (in the compatibility tab) item as: "Run this program as administrator" How can I set this launch from a Delphi program?

Answer 1

ShellExecute ( Application.Handle , 'RUNAS', '/user:Администратор Notepad', 0, 0, SW_SHOWNORMAL);

Or create the shortcut you need and run it. CreateComObject(CLSID_SHELLLINK)
Working with labels .