Получение количества установленных процессоров
Материал из DRKB
Получение количества установленных процессоров[править | править код]
function GettingProcNum: string; // Win95 or later and NT3.1 or later
var
Struc: _SYSTEM_INFO;
begin
GetSystemInfo(Struc);
Result := IntToStr(Struc.dwNumberOfProcessors);
end;
ID: 01433