Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Последние темы форума

Показать новые сообщения »

Почтовая рассылка

Подписчиков: 11855
Последний выпуск: 19.06.2015

Приоритеты в Windows

Автор: System

Введение

По определению, Windows является многозадачной операционной системой. То есть одновременно в ней могут выполняться несколько задач. Однако задача задаче рознь. И различие это заключается в приоритете. То есть, при выполнении какой-либо программы Windows распределяет ресурсы определенным образом, в зависимости от того, какой приоритет у какого процесса (программы). Программы в дальнейшем я буду называть процессами, так проще. Каждая запущенная программа в Windows представляет собой процесс. Приоритеты бывают разные - большие, маленькие, но об этом потом. Чем это может нам помочь? А вот чем. Многие сетуют на медленность выполнения программ на Vb. В свое время я на это наткнулся на самом наглядном примере. Представьте себе программу, которая должна через определенный интервал времени выполнять какое-либо действие - ну, например, что-то выводить пользователю. Просто - скажете Вы. Берем таймер и вперед. А если помимо этого периодически программа должна что-то еще считать, и не один раз, а таймеров много? Будет тормозить. Причем не Windows, а только программа. Несправедливо? Да. Это значит, что Windows отделяет мало ресурсов Вашей программе, которых ей явно недостаточно. Значит попросить у Windows больше, только как?

Вот так

Значит надо менять приоритет. Самое время о них поговорить. В Windows'98 приоритетов меньше, чем в Windows Me или 2000, но они таки есть J. Вот они.

Приоритет реального времени (real time) - программа выполняется так, как будто она одна и есть цель жизни Windows. Все ресурсы отдаются ей.

Высокий приоритет (high) - программа выполняется так, чтобы оставить чуть-чуть остальным приложениям.

Нормальный (normal) - выполнение идет обычным путем.

Низкий (idle) - если выполнение и идет, то только когда Windows делать нечего.

Ну так вот, запущенная программа сначала получает приоритет Normal, и выполняется своим чередом. При этом приоритете, что бы программа ни делала, она не сможет съесть ресурсов столько, чтобы повис Windows. В теории. Но нам так не подходит. Нам надо приоритет high или, если все очень напряжно, real time. Но real time - вещь опасная. Может запросто затормозиться даже мышка. А об остальных программах я и говорить на хочу. Просто копец и все тут. Итак, как же все таки приоритет поменять.

Снова API

Да, за установку приоритета отвечает функция SetPriorityClass. То есть, вызвав ее, и передав все, что ей надо, мы получим нужный приоритет.

Private Declare Function SetPriorityClass _
Lib "kernel32" (ByVal hProcess As Long, _
ByVal dwPriorityClass As Long) As Long
  • hProcess - это Handle процесса. О нем ниже.
  • dwPriorityClass - приоритет. Он то нам и нужен.

Константы приоритетов:

Private Const REALTIME_PRIORITY_CLASS = &H100
Private Const HIGH_PRIORITY_CLASS = &H80
Private Const NORMAL_PRIORITY_CLASS = &H20
Private Const IDLE_PRIORITY_CLASS = &H40

Все просто - берем константу и вперед, но нам надо получить Handle процесса. То есть, процесс и окно для Windows вещи хоть и почти синонимичные, но не всегда. Handle окна - одна вещь, Handle процесса - совсем другая. То есть, у процесса может быть много окон, но у окна только один процесс владелец. Значит, нам надо научиться находить Handle именно процесса. В этом нам поможет функция OpenProcess, которая после передачи ей параметров, скажет, что за Handle у процесса.

Private Declare Function OpenProcess _
Lib "kernel32" (ByVal dwDesiredAccess As Long, _
ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long

dwDesiredAccess - что мы хотим узнать (Handle у процесса бывают разные, для завершения процесса - одни, для получения информации - другой). Мы будем использовать константу PROCESS_QUERY_INFORMATION, то есть опрашивать процесс.

Private Const PROCESS_QUERY_INFORMATION = &H400

bInheritHandle - переменная Boolean. Если ее передать True, то полученный Handle может в будущем быть использован другим процессом. Но нам это не надо. Передаем туда False.

DwProcessId - так, а это очередная вещь - идентификатор (id) процесса. Нам надо и его получить. Как? Просто! Функция GetCurrentProcessId, вызываемая без параметров (слава Богу) просто возвращает id текущего процесса.

Private Declare Function GetCurrentProcessId _ 
Lib "kernel32" Alias "GetCurrentProcessId" () As Long

Все. Можно вздохнуть и все сделать красиво.

Немного кода

Option Explicit
Private Declare Function SetPriorityClass _
Lib "kernel32" (ByVal hProcess As Long, _
ByVal dwPriorityClass As Long) As Long
Private Const REALTIME_PRIORITY_CLASS = &H100
Private Const HIGH_PRIORITY_CLASS = &H80
Private Const NORMAL_PRIORITY_CLASS = &H20
Private Const IDLE_PRIORITY_CLASS = &H40
Private Declare Function OpenProcess _
Lib "kernel32" (ByVal dwDesiredAccess As Long, _
ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long
Private Const PROCESS_QUERY_INFORMATION = &H400
Private Declare Function GetCurrentProcessId Lib "kernel32" () As Long

Private Sub SetPriority(Priority As Long)
Dim ProcId As Long 'переменная для id процесса
Dim ProcHandle As Long 'переменная для handle процесса
ProcId = GetCurrentProcessId 'получим id
ProcHandle = OpenProcess(PROCESS_QUERY_INFORMATION, False, ProcId)
'получили Handle
Call SetPriorityClass(ProcHandle, Priority) ' ставим приоритет
End Sub

Private Sub Form_Load()
'ставим приоритет
SetPriority HIGH_PRIORITY_CLASS
End Sub

Готовый проект тут.

Но сразу предупрежу - приоритет лучше всего менять не постоянно, а на время. То есть, перед критическим участком кода ставим приоритет High или RealTime, а потом снова Normal. Еще раз повторюсь, что использование RealTime приоритета - вещь опасная. Ну вот и все, заставьте Windows поделиться пирогом ресурсов!


«Щас будем творить» © System

Оставить комментарий

Комментарий:
можно использовать BB-коды
Максимальная длина комментария - 4000 символов.
 

Комментарии

1.
Аноним
+5 / -0
Мне нравитсяМне не нравится
16 июля 2004, 14:37:59
Если вы меняете приоритет своего процесса, то легче для получения хэндла своего процесса воспользоваться функцией GetCurrentProcess(), а не функциями GetCurrentProcessId и OpenProcess. Тем более хэндл полученный функцией OpenProcess надо потом закрывать (CloseHandle), в отличии от функции GetCurrentProcess, после которой не надо.
Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог