Вниз
Скачать: CL | DM;

shutdown   Найти похожие ветки 

 
VictorT   (2002-03-22 13:20) [0]

Подскажите плиз, как можно програмно завершить роботу Windows NT 4.0. В Win 9x я делал запуском rundll.exe с параметрами.


 
Alx2 ©   (2002-03-22 13:24) [1]

см. ExitWindowsEx


 
VictorT   (2002-03-22 13:28) [2]

Спасибочки, помог.


 
drpass ©   (2002-03-22 15:31) [3]

t: _Token_Privileges;
ht: cardinal;
rl: cardinal;
...
if OpenProcessToken(GetCurrentProcess, TOKEN_ADJUST_PRIVILEGES or TOKEN_QUERY, ht) then begin
LookupPrivilegeValue(nil, "SeShutdownPrivilege", t.Privileges[0].Luid);
t.PrivilegeCount:=1;
t.Privileges[0].Attributes := SE_PRIVILEGE_ENABLED;
AdjustTokenPrivileges(ht, false, t, 0, nil, rl);
end;
А дальше делаешь ExitWindowsEx


 
SerVS - S   (2002-03-22 17:08) [4]

Если лень кому думать, ответы с примерами можно взять на www.delphi.xonix.ru



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

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



Память: 0.45 MB
Время: 0.007 c
3-64892
Explorer
2002-05-24 15:06
2002.06.20
ошибка при работе с PReport


3-64917
Dimaiv
2002-05-25 16:40
2002.06.20
Когда работаешь через TTable Delphi,


1-65068
Nebula
2002-06-10 12:43
2002.06.20
Reports


7-65267
SerVS - S
2002-02-22 19:26
2002.06.20
Драйвер клавиатуры


3-64914
dr_neo1
2002-05-24 18:52
2002.06.20
Срочно! Про BDE!!!




   Наверх