1. Наш канал codeby в telegram. Пишем об информационной безопасности, методах защиты информации, о программирован. Не пропускай новости с кодебай, будь в тренде ! Подробнее ...

    Скрыть объявление
  2. Чат codeby в telegram перезагрузка. Обсуждаем вопросы информационной безопасности и методы защиты информации, программирование. Задавайте свои вопросы и комментируйте чужие. Подробнее ...

    Скрыть объявление

Приоритет програм

Тема в разделе "Delphi - программирование", создана пользователем LSD, 30 май 2004.

Статус темы:
Закрыта.
  1. LSD

    LSD Гость

    Репутация:
    0
    Как сделать, что бы при запуске программа имела приоритет выше средного или ниже?
     
  2. red

    red Гость

    Репутация:
    0
    Вот так :
    Код:
    procedure SetPrior;
    var 
     ProcessID: DWORD; 
     ProcessHandle: THandle; 
     ThreadHandle: THandle; 
    begin 
     ProcessID := GetCurrentProcessID; 
     ProcessHandle := OpenProcess(PROCESS_SET_INFORMATION, 
       false, ProcessID); 
     SetPriorityClass(ProcessHandle, REALTIME_PRIORITY_CLASS); 
     ThreadHandle := GetCurrentThread; 
     SetThreadPriority(ThreadHandle, THREAD_PRIORITY_TIME_CRITICAL); 
    end;
     
Загрузка...
Статус темы:
Закрыта.

Поделиться этой страницей