Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2010.12.19;
Скачать: CL | DM;

Вниз

Узнать количество процессоров компьютера   Найти похожие ветки 

 
Игорь ©   (2010-09-25 13:04) [0]

Здравствуйте, подскажите пожалуйста как узнать количество процессоров компьютера, NtQuerySystemInformation->SYSTEM_BASIC_INFORMATION->KeNumberProcessors возвращает количество ядер, в MSDN ничего дельного не нашел, Windows 7


 
Loginov Dmitry ©   (2010-09-25 22:45) [1]


function GetCPUCount(AMask: Cardinal): Integer;
var
 I: Integer;
begin
 Result := 0;
 for I := 0 to 31 do
   if Odd(AMask shr I) then
     Result := I + 1;
end;

var
 Mask1, Mask2: Cardinal;
GetProcessAffinityMask(GetCurrentProcess, Mask1, Mask2);
CPUCount := GetCPUCount(Mask1);


 
Игорь Шевченко ©   (2010-09-26 10:25) [2]


> KeNumberProcessors возвращает количество ядер


А тебе чего надо - количество камней ?



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

Текущий архив: 2010.12.19;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.009 c
15-1284025204
И. Павел
2010-09-09 13:40
2010.12.19
Как узнать логин, под которым клиент вошел в MS SQL?


2-1285398887
webpauk
2010-09-25 11:14
2010.12.19
Нарисовать иконку в TEdit


11-1227267675
Sergey1991
2008-11-21 14:41
2010.12.19
Неправильно отображаются большие числа в TTable


15-1284064172
Юрий
2010-09-10 00:29
2010.12.19
С днем рождения ! 10 сентября 2010 пятница


2-1285421559
Первокурсница
2010-09-25 17:32
2010.12.19
Одна кнопка работает, другая нет (добавление записей в БД)