Форум » [x]Harbour » Загрузка ЦП » Ответить

Загрузка ЦП

fil: Всех с Новым Годом ! Есть список работающих приложений. Как определить процентную загрузку ЦП каждым из них (a la Диспетчер задач) ?

Ответов - 10

santy: http://www.sql.ru/forum/1050408/kak-poluchit-zagruzku-cpu-v-programmno http://tripsin.narod.ru/notes/CpuUsaseForProcess.htm http://msdn.microsoft.com/en-us/library/aa394599(v=vs.85).aspx

fil: Благодарю ! С WMI хороший примерчик

Alex_Cher: А чем можно вытащить список работающих приложений, ну например чтобы избежать повторного запуска программы ...?


Dima: Alex_Cher пишет: ну например чтобы избежать повторного запуска программы ...? Своей ? Где то в самом начале [pre2] if ISEXERUNNING("Myprog") ? "Программа уже запущена........." quit endif [/pre2] [pre2] #pragma BEGINDUMP #include <hbapi.h> #include <windows.h> #include <shlobj.h> HB_FUNC( ISEXERUNNING ) // ( cExeNameCaseSensitive ) --> lResult { HANDLE hMutex = CreateMutex( NULL, TRUE, (LPTSTR) hb_parc(1) ); hb_retl( GetLastError() == ERROR_ALREADY_EXISTS ); ReleaseMutex( hMutex ); } #PRAGMA ENDDUMP [/pre2]

Haz: Alex_Cher пишет: А чем можно вытащить список работающих приложений, ну например ну например santy полтора года назад уже дал ссылку http://msdn.microsoft.com/en-us/library/aa394599

Dima: Еще можно тут глянуть http://clipper.borda.ru/?1-4-0-00000369-000-0-0-1226420037

Alex_Cher: Dima пишет: Своей ? Где то в самом начале if ISEXERUNNING("Myprog") ? "Программа уже запущена........." quit endif Dima привет, огромное спасибо .... все работает, но в силу своей низкой квалификации мало что понял как это было сделано ..... а вообще мужики задыхаюсь без документации, касательно Clipper проблем нет, а вот касательно оригинальных функций Harbour мало что могу найти ... например, используемая функция CreateMutex() ..? ни в одной ДОКе приложенной к Harbour MiniGUI Extended Edition 2.4.3 - 2015.01.21 описания нет, где копать ... дайте совет ....

PSP: Alex_Cher, CreateMutex - функция ОС (Windows): https://msdn.microsoft.com/en-us/library/windows/desktop/ms682411%28v=vs.85%29.aspx Механизм мютексов (семафоров): https://ru.wikipedia.org/wiki/%D0%9C%D1%8C%D1%8E%D1%82%D0%B5%D0%BA%D1%81 В исходники на Харборе можно вставлять С-шный код: #pragma BEGINDUMP ...... #pragma ENDDUMP

Dima: Alex_Cher пишет: мало что могу найти ... например, используемая функция CreateMutex() ..? Тут http://www.kresin.ru/hrbfaq_3.html#Doc

PSP: В Харборе сейчас wapi_CreateMutex() есть.



полная версия страницы