Загрузка процессора

Форумы Между деломЗагрузка процессора ← Ctrl1Ctrl →

Этот топик читают: Гость

Ответов: 2060

Рейтинг: 28

#1: 2007-08-05 13:45:14 ЛС | профиль | цитата

У меня в системе двухядерный прочессор. Как определить по отдельности на сколько загруженно каждое ядро? Что то у меня не выходит.
code_1779.txt

карма: 1

файлы: 1

code_1779.txt [602B] [304]

Гость

Ответов: 17029

Рейтинг: 0

#2: 2007-08-05 13:57:16 правка | ЛС | профиль | цитата

Редактировалось 3 раз(а), последний 2025-01-15 00:40:22

карма: 0

Ответов: 2060

Рейтинг: 28

#3: 2007-08-05 14:22:39 ЛС | профиль | цитата

Tad, я не знаю. Почемуто один CPUUsage показывает число от 0 до 200. Может он сразу сумму загрузки двух ядер показывает?

[size=-2]------ Добавлено в 14:22

procedure THICPUUsage._work_doCollectCPUData;
var i:integer;
CPUUsage:real;
begin
CollectCPUData;
CPUUsage := 0;
// Show dota for each processor
for i := 1 to GetCPUCount-1 do CPUUsage := CPUUsage + GetCPUUsage(i)*100;
if CPUUsage < 0 then CPUUsage := 0;
_hi_OnEvent(_event_onUsage, Round(CPUUsage));
end;

Вот эта строка случайно ни кому ни очём не говорит?

карма: 1

Гость

Ответов: 17029

Рейтинг: 0

#4: 2007-08-05 14:53:18 правка | ЛС | профиль | цитата

Редактировалось 3 раз(а), последний 2025-01-15 00:40:22

карма: 0

Ответов: 2060

Рейтинг: 28

#5: 2007-08-05 16:39:44 ЛС | профиль | цитата

Tad, а мне нужно по отдельности.

[size=-2]------ Добавлено в 15:22
Tad, я выделенную строку заменил на это

CPUUsage := GetCPUUsage(_prop_NumberCPU)*100;[/code]
Вроде лучще стало.:)

[size=-2]------ Добавлено в 16:39 [/size]
[b]Tad[/b], только что свой код проверил, всё работает правельно как в Диспечере задач. 0 - первый процессор, 1 - второй процессор.
Дилма, Галков может поправите код, да на SVN отправите?:)

карма: 1

Администрация

Ответов: 15295

Рейтинг: 1519

#6: 2007-08-06 00:09:58 ЛС | профиль | цитата

добавлено

карма: 27

https://hiasm.com

Гость

Ответов: 17029

Рейтинг: 0

#7: 2007-08-06 11:43:41 правка | ЛС | профиль | цитата

Редактировалось 3 раз(а), последний 2025-01-15 00:40:22

карма: 0

Гость

Ответов: 17029

Рейтинг: 0

#8: 2007-08-06 11:45:41 правка | ЛС | профиль | цитата

Редактировалось 3 раз(а), последний 2025-01-15 00:40:23

карма: 0

Ответов: 9906

Рейтинг: 351

#9: 2007-08-06 18:54:06 ЛС | профиль | цитата

Ну будет у дурака неправильно работать, что в этом плохого

карма: 9

Администрация

Ответов: 15295

Рейтинг: 1519

#10: 2007-08-06 22:21:24 ЛС | профиль | цитата

согласен. Проверить конечно можно и даже сообщение об ошибке вывести, но нужны ли лишние коды тому, кто дураком не является

карма: 27

https://hiasm.com

Ответов: 16884

Рейтинг: 1239

#11: 2007-08-07 10:02:32 ЛС | профиль | цитата

На счет ненужности проверки - согласен.
Но верхняя точка NumberCPU не помешает.

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

Форумы Между деломЗагрузка процессора ← Ctrl1Ctrl →


Сообщение ...
Прикрепленные файлы (файлы не залиты)