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

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

Помогите разобраться с прозедурой [D7, XP]


spec2005 ©   (2010-03-02 01:33:00) 

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;

Что она делает я знаю, выключение компьютера, а вот как это всё работает никак не разберусь. за выключение компьютера отвечает функция:
ExitWindowsEx(EWX_SHUTDOWN or EWX_POWEROFF, 0);
А что обозначает всё остальное, объясните.


spec2005   (2010-03-02 11:19:00) [1]

Я уже перечитал справки и примеров пересмотрел до едрени-фени про ExitWindowsEx, и другие api функции. меня интересует что в этой процедуре до неё описано, если можно по строчно что именно происходит. Так как я только начинаю программировать то раньше не встречался с этим.


Плохиш   (2010-03-02 10:46:00) [2]


> spec2005 ©   (02.03.10 09:12) [4]
>
> Спасибо за помощь, очень помогли. Я думал здесь мастера
> сидят, а не Юмористы.

Это конференция для начинающих программистов, а не для дармоедов не желающих даже справку/описания прочитать.


И. Павел   (2010-03-02 09:39:00) [3]

Например тут описаны все нужные функции: http://win-api.narod.ru/


spec2005   (2010-03-02 09:12:00) [4]

Спасибо за помощь, очень помогли. Я думал здесь мастера сидят, а не Юмористы.


123   (2010-03-02 09:05:00) [5]

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


QAZ   (2010-03-02 08:50:00) [6]

Блин, сколько можно выключать компьютер ? зачем?  если есть хоть одна прога которая не хочет закрыца,хрен че ты выключиш...


Германн   (2010-03-02 01:37:00) [7]


> Что она делает я знаю, выключение компьютера, а вот как
> это всё работает никак не разберусь. за выключение компьютера
> отвечает функция:
> ExitWindowsEx(EWX_SHUTDOWN or EWX_POWEROFF, 0);
> А что обозначает всё остальное, объясните.

Всё остальное объясняют на курсах по программированию!
Блин.
Прям мой последний гендир спросил. :)


Наверх

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