Главная страница
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.008 c
11-1227142295
arthur
2008-11-20 03:51
2010.12.19
InputBox() function


15-1284124745
nobody
2010-09-10 17:19
2010.12.19
Вот какие программы нужно создавать...


15-1282578797
boriskb
2010-08-23 19:53
2010.12.19
Переписка с "нигерийскими родственниками"


2-1285224640
Сергей
2010-09-23 10:50
2010.12.19
подсказка в DBGrid


3-1248764936
tomkat
2009-07-28 11:08
2010.12.19
экспорт метаданных FireBird в скрипт