Вниз
Скачать: 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.015 c
14-37307
sancho
2002-12-22 18:25
2003.01.13
BUTTON


6-37249
pdv
2002-11-09 11:09
2003.01.13
Как отключить инет на компе (инет подключен по локалке) ?


1-37048
Brat-2
2003-01-02 15:47
2003.01.13
Поиск подстроки в строке


3-36950
vitnt
2002-12-18 11:50
2003.01.13
Interbase 5+6


7-37393
Sego
2002-11-01 10:03
2003.01.13
Как включить клаву и мышку, после отключения?




   Наверх