Прежде чем задавать вопрос - поищите его в поиске!
+1 голос
45 просмотров
В uses должен быть подключён модуль shellapi

var
f:file;
begin
assignfile(f,'Restart.bat');
rewrite(f);
write(f,'shutdown.exe -r -t 00');
closefile(f);
ShellExeCute(handle,'open','Restart.bat',nil,nil,sw_minimize);
end;

Если поменять -r -t 00 на -s -t 00, то копьютер выключится. 00 - это время перезагрузки/выключения в милисекундах

Как тебе такое? Есть ли свои минусы в этом коде
спросил 16 Авг, 15 от Павел в категории Мастер Delphi | 45 просмотров

1 Ответ

0 голосов
Лучший ответ

Классноyes Все гениальное просто!

ответил 16 Авг, 15 от krotovroman Мастер (131,190 баллов)
выбран 17 Авг, 15 от krotovroman

Похожие вопросы

+1 голос
2 ответов
0 голосов
1 ответ
0 голосов
1 ответ
спросил 23 Авг, 16 от Александр в категории Отчеты в 1С | 43 просмотров
513 вопросов
694 ответов
433 пользователей