Reiniciar o apagar Windows

[dec]

¿Cómo puedo apagar el ordenador o hacer un reset desde mi programa?


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');