[antonKKEP]

WinExec(PANsiChar('cmd.exe /c Shutdown -r -m \\'Имя_ПК''),sw_Normal); (перезагрузка)
WinExec(PANsiChar('cmd.exe /c Shutdown -s -m \\'Имя_ПК''),sw_Normal);
(выключение)