Apagar ordenador remoto

[Novás]

Hola de nuevo:

Veréis, estoy utilizando el siguiente código:

Código Delphi [-]
nombre:=InputBox('Intentar apagar equipo...','Introduzca el nombre o la dirección IP '+
                   'de la máquina que desea apagar','');
  if nombre<>'' then
  begin
    sms:=InputBox('Mensaje al apagar equipo...','Introduzca el mensaje que desea que '+
                  'visualice el ordenador remoto.','');
    if InitiateSystemShutdown(PChar(nombre),
                              PChar(sms),
                              4,
                              True,
                              False)=False then
    begin
      MessageDlg('No se ha apagado la máquina...'+#13+'Error: '+
                    SysErrorMessage( GetlastError ),
                 mtInformation,
                 [mbOk],
                 0);
    end;
  end;

Este código, cuando le asigno los privilegios de apagar el ordenador de forma remota al grupo todos me funciona, sino no funciona.
Mi pregunta es... ¿Con que usuario se conecta el programa al ejecutar esta función? ¿Con el usuario activo en la máquina destino? ¿Con el usuario activo en mi máquina? ¿Con otro usuario distinto?... ¿Como puedo lograr que mi programa se conecte como administrador en la máquina remota conociendo el password?

Muchas gracias por adelantado