Does an open-source psexec clone written in Delphi exist?

I'd like to add psexec type functionality to an application, but I'd like to have it in native Delphi. Ultimately my goal is to remotely execute a proc开发者_JS百科ess as SYSTEM, which will require installing a service on the remote machine.

I'm familiar with the XCmd project, which is written in Visual C++. If there already exists a Delphi clone of this program/functionality that would be great. If not, I'll work to convert the XCmd project's logic to Delphi.

Does anyone know of a psexec or xcmd clone for Delphi?

RunAsSys comes close (doesn't work remotely though), it enables you to run something as system, my RunInSession tool has the ability to start a process in any session and remotely