Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Power Off in NT [NT4, Win2k, WinXP]


Landgraph ©   (2003-04-16 18:34:00) 

Народ, спасайте =)
Не пойму почему не хочет выключаться компьютер в винНТ.
Вот установка привилегий:
HANDLE hToken;
TOKEN_PRIVILEGES tkp;
if(OpenProcessToken(/*GetCurrentProcess()*/pluginюhDllInstance,
TOKEN_ADJUST_PRIVILEGES | TOKEN_QUERY, &hToken))
{
LookupPrivilegeValue(NULL, SE_SHUTDOWN_NAME,
&tkp.Privileges[0].Luid);
tkp.PrivilegeCount = 1; // one privilege to set
tkp.Privileges[0].Attributes = SE_PRIVILEGE_ENABLED;
AdjustTokenPrivileges(hToken, FALSE, &tkp, 0,
(PTOKEN_PRIVILEGES)NULL, 0);
if (GetLastError() != ERROR_SUCCESS)
MessageBox(ConfigWND, "Can"t Set Privileges!", "Error!", 0);
}
После вызова ExitWindowsEx GetLastError возвращает 1314, по МСДН - не хватает привилегий =(

P.S. звиняйте что на сях - не успел на паскаль перевести =)


Cobalt   (2003-04-17 16:02:00) [1]

Что говорит GetLastError после AdjustTokenPrivileges


Cobalt   (2003-04-17 16:02:00) [2]

Что говорит GetLastError после AdjustTokenPrivileges ?


Landgraph   (2003-04-17 15:27:00) [3]

А поточнее?


Игорь Шевченко   (2003-04-16 18:51:00) [4]

Надо чаще GetLastError смотреть, однако :)


Landgraph   (2003-04-16 18:47:00) [5]

Под Win9x - да =) А вот под винНТ он не хочет =(

Ну впадлу мне вручную комп выключать... Особенно когда хоцца песенку дослушать, а надо уходить =)


Игорь Шевченко   (2003-04-16 18:40:00) [6]

А что, winamp уже для выключения компьютеров приспособлен ? А погоду, часом, не предсказывает ? :)))


Landgraph   (2003-04-16 18:36:00) [7]

Этот код в ДЛЛ... Плагин для винампа =)


Наверх

Титульная страница Поиск, карта сайта Написать письмо