Delphi-Help

Главная Статьи Процессор Как определить количество CPU?

Как определить количество CPU?

Оцените материал
(0 голосов)


Как определить количество CPU?

function GetCPUCount: byte;
var
  si: TSystemInfo;
begin
   GetSystemInfo( si );
   Result := si.dwNumberOfProcessors;
end;
 
procedure TForm1.Button1Click(Sender: TObject);
begin
   ShowMessage( IntToStr( GetCPUCount ) );
end;
Прочитано 3535 раз

Авторизация



Счетчики