Apagar una PC en red
 

Hola:

¿Cómo puedo apagar un ordenador que está conectado en red?

Gracias.

Lós últimos SO de M$ traen una utilidad llamada "ShutDown" que permite entre tantas cosas apagar un equipo remoto, solo si tienes permisos para hacerlo:
Desde código podrías utilizar algo como:

Código Delphi [-]
Win32Check(InitiateSystemShutdown('Equipo', nil, 0, True, False));

No sin antes haber obtenido los privilegios.

Saludos!

¡Un momento! No me quedó claro. ¿Si yo escribo ese código en un programa hecho en Delphi puedo apagar el ordenador? ¿Y a qué se refiere eso de permisos?

Si pudieras apagar cualquier PC conectada a la red, sin necesidad de tener permiso sobre esta, esto sería un descontrol. Fíjate que en el ejemplo de la línea de comandos, me he acreditado previamente para poder enviar la petición de apagado! ;)

Entiendo, pero ¿cómo se pide ese permiso utilizando Delphi? ¿El código que escribes es Delphi?

No lo he probado, pero supongo que creando una conexión con alguna de las Windows Networking Functions (por ejemplo WNetAddConnection2), pero obviamente es necesario conocer un usuario con privilegio de ShutDown de la terminal remota.

Ah, ya veo. Bueno, había pensado también en algo alternativo es lo siguiente:

Puedo instalar un programa en mi PC y en la PC que quiero apagar, luego por red le envío un mensaje dentro de un archivo utilizando el programa, cuando el otro programa lo lee, apaga el ordenador. Ahora, lo que me faltaría saber para poder hacer algo así es:

* ¿Cómo envío un archivo por red utilizando mi programa?
* ¿Cómo apago un ordenador por código Delphi?

Al igual que lo hace este programita mío hecho totalmente en delphi, puedes crear un servidor con algun componente como el TIdTCPServer de la Indy, que interprete algún comando y realice un ExitWindowsEx. Obviamente vas a tener que tener un cliente para conectarte y enviarle el comando! ;)

Saludos!

Complicandola un poco
 

Y si quisieramos apagar una pc via internet, dicha pc con una direccion tipo no-ip (o similares)?

Lo estaba pensando para un programa mas grandecito, pero si logro esto, el resto va sobre ruedas !

Saludos ! :D

Me encanta tu programa, delphi.com.ar, es mucho más de lo que yo esperaba crear, pero me deja inquieto el hecho que me hayas pasado un programa ya compilado y no el código. Bueno, no quiero tenerlo de forma fácil, pero es que en esto soy un completo novato. Bien, entiendo lo siguiente, que existen dos programa que se comunican por red, ¿cómo? ¿Cuál es la lista de comandos que hacen eso posible? ¿Hay tutoriales para esto?

Gracias.

Me encanta tu programa, delphi.com.ar, es mucho más de lo que yo esperaba crear, pero me deja inquieto el hecho que me hayas pasado un programa ya compilado y no el código. Bueno, no quiero tenerlo de forma fácil, pero es que en esto soy un completo novato. Bien, entiendo lo siguiente, que existen dos programa que se comunican por red, ¿cómo? ¿Cuál es la lista de comandos que hacen eso posible? ¿Hay tutoriales para esto?

Hola, para aplicaciones de este tipo te recomiendo los componentes Indy IdTCPClient e IdTCPServer. Podes bajarte el ejemplo TCP de la pagina y analizarlo. Tambien busca en el foro sobre estos componentes. Lo que te puede servir es un ejemplo de un chat simple.
Bueno, te repito, si buscas en el foro vas a encontrar mucha informacion útil.

Saludos...

Yo soy bastante abierto con el código, pero hay muchas cosas que prefiero guardármelas... esta es una de ellas, por varios motivos. Me alegro que te haya gustado, particularmente esta aplicación utiliza los Sockets de Indy, los mismos que te recomienda Sotrono.

Saludos!