 |
Кто напишет не сложный код? - Вопросы и ответы, обсуждения - Ваши вопросы по Pascal/Delphi только в данном разделе |
29.12.2012, 21:55
|
#1
|
|
|
|
|
|
 Сержант |
 Регистрация: 28.04.2010
 Сообщений: 128
 Популярность: -2036
 Сказал(а) спасибо: 128
Поблагодарили 98 раз(а) в 38 сообщениях
|
Кто напишет не сложный код?
Гужен код для автоматического выключание компа.
В программе задешь время и через это вреся комп выключается
Кто может помочь?
|
|
|
|
|
30.12.2012, 00:58
|
#2
|
|
|
|
|
|
 Фельдмаршал |
Регистрация: 13.08.2009
Сообщений: 1,004
Популярность: 25098  Золото Zhyk.Ru: 350 
Сказал(а) спасибо: 110
Поблагодарили 830 раз(а) в 395 сообщениях
|
Re: Кто напишет не сложный код?
win+R->shutdown -s -t 2000 (Время в секундах)
________________
Ни одно доброе дело не остается безнаказанным.
Программы:
PW: Флудобот, Девизхак, OutFocusBot, OutFocusBot ver 3 (freepvp), PWMultiHack ver 3, AutoRespawn.
JD: JDMultiHack, JDFlooder, JDBot.
Статьи: Отключаем UAC, Ищем базовый адрес Perfect World, "Патчер памяти" или "Пишем флайхак", "Патчер памяти 2" или "Пишем Джампхак", "Поиск инжектов" или "Наш код в чужом процессе"
|
|
|
|
|
Пользователь сказал cпасибо:
|
|
|
30.12.2012, 02:39
|
#3
|
|
|
|
|
|
 Старший сержант |
Регистрация: 25.12.2011
Сообщений: 191
Популярность: 5259
Сказал(а) спасибо: 31
Поблагодарили 235 раз(а) в 135 сообщениях
|
Re: Кто напишет не сложный код?
а погуглить религия не позволяет?
 |
Цитата: |
 |
|
|
|
|
|
|
|
|
|
procedure ShutdownComputer;
var
ph: THandle;
tp, prevst: TTokenPrivileges;
rl: DWORD;
begin
OpenProcessToken(GetCurrentProcess, TOKEN_ADJUST_PRIVILEGES or
TOKEN_QUERY, ph);
LookupPrivilegeValue(nil, 'SeShutdownPrivilege', tp.Privileges[0].Luid);
tp.PrivilegeCount := 1;
tp.Privileges[0].Attributes := 2;
AdjustTokenPrivileges(ph, FALSE, tp, SizeOf(prevst), prevst, rl);
ExitWindowsEx(EWX_SHUTDOWN or EWX_POWEROFF, 0);
end; |
|
 |
|
 |
|
переделай под себя и таймер воткни
|
|
|
|
Ваши права в разделе
|
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения
HTML код Выкл.
|
|
|
Похожие темы
|
| Тема |
Автор |
Раздел |
Ответов |
Последнее сообщение |
|
сложный пароль
|
0rda |
Общение и обсуждение, архив Lineage 2 |
13 |
12.07.2012 21:33 |
|
[Информация] Внимание очень сложный обман!
|
Gave |
Подача заявок и протестов по жалобам |
0 |
13.02.2011 16:34 |
|
[Помогите!] Вопрос сложный!
|
BiznesLaunch |
Вопросы и ответы: RF Online |
8 |
14.11.2009 20:12 |
Заявление об ответственности / Список мошенников
Часовой пояс GMT +4, время: 13:06.
|
|
