Главная страница
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.005 c
15-1284014875
Игорь
2010-09-09 10:47
2010.12.19
У кого стоит D2100


3-1249539534
_drug_
2009-08-06 10:18
2010.12.19
Состояние TIBDataset


2-1285589072
harikolo
2010-09-27 16:04
2010.12.19
Чтение и запись данных в Interbase через Delphi


15-1283792261
Делфиец
2010-09-06 20:57
2010.12.19
Байкал на Десктоп


11-1226307025
Dy1
2008-11-10 11:50
2010.12.19
работа с Юникодом