Выключение перезагрузка спящий режим delphi 7 win 7

[Alexandr17]

как в delphi 7 на win 7 можно принудительно выключить перезагрузить или даже отправить в спящий режим компьютер.

[Stilet]

Попробуй так: http://www.programmersforum.ru/showthread.php?t=131484

[Alexandr17]

по поводу выключение перезагрузки и режима сна то вот нашел решения.
ShellExecute(handle, nil,'shutdown',' -f -a','', SW_SHOWNORMAL);
winexec(Pchar('rundll32.exe powrprof.dll,SetSuspendState'),sw_S how);
ShellExecute(handle, nil,'shutdown',' -f -r','', SW_SHOWNORMAL);
по идеи должно работать