Скачать: CL | DM;

автоматическое выключение компъютера   Найти похожие ветки 

← →
Георгий   (2004-11-27 18:47) [0]

Доброе время суток мастера!  Программе требуется в заданное  время выключить комп.  Скачал где то процедуру которая должна это
делать,  но к сожалению делает  это только в среде Дельфи.  Подскажите где собака зарыта. Винда - WinXp

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;

---

← →
Express   (2004-11-27 19:01) [1]

Георгий оставь свой E-mail и я тебе могу скинуть программу которая перезагружает, выходить из под пользователя и выключает комп в заданное тобой время!

Если тебе не нужна программа, тогда могу скинуть Компонент, который это все делает в том числе выключает комп.

---

← →
Express   (2004-11-27 19:04) [2]

Мой E-Mail: ExpressMaximum@mail.ru

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.022 c