Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.05.05;
Скачать: CL | DM;

Вниз

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

 
mmmh   (2003-03-09 23:55) [0]

в компьютерном клубе. Что лучше использовать из компанентов.


 
Anatoly Podgoretsky ©   (2003-03-10 00:01) [1]

Да ты же просто со временм не можешь работать, уж какое к черту управление компьютерами по сети.


 
Mr.Ice ©   (2003-03-10 02:59) [2]

сделай 2 проги клиент и сервер
клиент ставь себе а остальным сервер
сделай чтобы клиент при приеме сообщения выполнял

для 95/98/ме
if not ExitWindowsEx(EWX_Force or EWX_PowerOff or EWX_ShutDown, 0) then
MessageBox(0, "An application refused to terminate", "Win32", MB_OK);


а для NT/w2k/XP
var hToken: THandle;
tkp: TTokenPrivileges;
ReturnLength: Cardinal;
begin
if OpenProcessToken(GetCurrentProcess(), TOKEN_ADJUST_PRIVILEGES orTOKEN_QUERY, hToken) then
begin
LookupPrivilegeValue(nil, "SeShutdownPrivilege",tkp.Privileges[0].Luid);
tkp.PrivilegeCount:=1;
tkp.Privileges[0].Attributes:=SE_PRIVILEGE_ENABLED;
if AdjustTokenPrivileges(hToken, False, tkp, 0, nil, ReturnLength)then
ExitWindowsEx(EWX_SHUTDOWN or EWX_POWEROFF, 0);
end;
end.



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

Текущий архив: 2003.05.05;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.015 c
3-12631
Avreliy
2003-04-15 21:02
2003.05.05
Отмена Post!


9-12591
CyB3r
2002-09-15 22:28
2003.05.05
Определение направления в движке


1-12822
AlexAvz
2003-04-22 16:40
2003.05.05
Многооконные документы


7-12953
BPK
2003-02-17 23:00
2003.05.05
Как узнать состояние лотка CD-ROM?


3-12622
gary5555
2003-04-12 15:35
2003.05.05
Как сделать фильтрацию в уже профильтрованной базе???