Reboot despues de la ejecucion de determinado programa

[gorsan]

Muchas gracias Roman. Es justo lo que necesitaba.
Ahora: ¿Como hago un reboot forzoso?

[[escafandra]]

Empezado por gorsan

...Ahora: ¿Como hago un reboot forzoso?

Bueno, quizás jhonny ya te dió la solución.

Saludos.

[gorsan]

Código Delphi [-]
if ExitWindowsEx (0,0) = 0 then
  showmessage ('No puedorrr reiniciar Windows');

if ExitWindowsEx (1,0) = 0 then
  showmessage ('No puedorrr cerrar el ordenador');

if ExitWindowsEx (2,0) = 0 then
  showmessage ('No puedorrr reiniciar el ordenador');

¿por qué me da el mensaje de error Incompatible types?
¿donde esta fallando?
Se supone que la funcion ExitWindowsEx esta en Windows.dcu ¿no?

[[escafandra]]

ExitWindowsEx retorna BOOL

Saludos.

[gorsan]

Necesito que se reinicie el pc. De la rutina que menciona Jhonny, es decir:

Código Delphi [-]
if ExitWindowsEx (0,0) = False then showmessage ('No puedorrr reiniciar Windows');
if ExitWindowsEx (1,0) = False then showmessage ('No puedorrr cerrar el ordenador');
if ExitWindowsEx (2,0) = False then showmessage ('No puedorrr reiniciar el ordenador');

solo se produce la (0,0), es decir, que se reinicia windows. Las otras dos, es decir, las (1,0) y (2,0), cerrar ordenador y reiniciar ordenador respectivamente no se producen.
Seguro que es porque el ordenador esta en un dominio y faltan privilegios de seguridad o no se cual es la razon.
¿alguien tiene alguna idea?
Gracias.

[[escafandra]]

Código Delphi [-]
ExitWindowsEx(0,0); // EWX_LOGOFF - Cierra los procesos y la sesión del usuario. 
ExitWindowsEx(2,0); // EWX_REBOOT - Reboot. Debes tener privilegio SE_SHUTDOWN_NAME 
ExitWindowsEx(8,0); // EWX_POWEROFF - Apagar. Debes tener privilegio SE_SHUTDOWN_NAME

Saludos.

[[Lepe]]

Aqui

Saludos