WinExec с добавленным методом doRunAsUser и свойствами/точками UserName/Password.
Не знаю стоит ли делать аналог и doConsoleExec. Можно сделать, когда понадобится.

Есть пример. Проверьте выдаёт ли код ошибки при неправильных входящих данных. На Windows XP в этом месте странное поведение - GetLastError() в процедуре THIWinExec._work_doRunAsUser при ошибке выдаёт код 0, тогда как _debug(GetLastError) внутри THIWinExec.RunProcessAsUser сразу после CreateProcessWithLogonW() покажет нормальный код.