Skip UAC prompt when using CreateProcess in Delphi

Question

Is there a method to skip a UAC prompt or force to run asInvoker when using OpenProcess? This is my current code:

var
  si: TStartupInfo;
  pi: TProcessInform