Вниз
Скачать: CL | DM;

Как определить загруженность процессора?   Найти похожие ветки 

 
Fydgety   (2002-11-03 03:15) [0]

Подскажите пожалуйста,если можно примерчик.


 
Kotka ©   (2002-11-03 17:54) [1]

Поищи такие компоненты здесь или на torry.com


 
Друмлин   (2002-11-03 17:58) [2]

сначала инициализируй режим(один раз и где-то в начале):

var CPUloadKey:HKEY;Cpuloadsize,ti:integer;cpuload:integer;
...
cpuloadsize:=sizeof(integer);
ti:=REG_DWORD;
RegOpenKey(HKEY_DYN_DATA, "PerfStats\StartStat", CPULoadKey);
RegQueryValueEx(CPULoadKey,"KERNEL\CPUUsage", nil,@ti,@cpuload,@cpuloadsize);
RegCloseKey(CPULoadKey);
RegOpenKey(HKEY_DYN_DATA, "PerfStats\StatData", CPULoadKey);
...

в тот момент, когда надо получить значение, делай:

...
RegQueryValueEx(CPULoadKey, "KERNEL\CPUUsage", nil, @ti, @CPULoad, @CPULoadSize);// то что тебе надо - в CPULoad
...

по завершению работы:

RegCloseKey(CPULoadKey);
RegOpenKey(HKEY_DYN_DATA, "PerfStats\StopStat", CPULoadKey);
RegQueryValueEx(CPULoadKey,"KERNEL\CPUUsage", nil,@ti,@cpuload,@cpuloadsize);
RegCloseKey(CPULoadKey);

а вообще то шуруя через HKEY_DYN_DATA\PerfStats можно много чего узнать



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.012 c
3-36951
Yurik
2002-12-18 13:29
2003.01.13
Добрый день уважаемые мастера!


1-37054
tupoy
2003-01-02 22:54
2003.01.13
Шифрование


1-37187
ferrik
2002-12-30 14:32
2003.01.13
Индексы


3-36933
Roma111
2002-12-18 08:49
2003.01.13
Не найдено описание для события с кодом ( 251 )


1-37094
simka
2003-01-03 21:39
2003.01.13
Как написать инсталяшку




   Наверх