{ **** UBPFD *********** by delphibase.endimus.com **** >> Определение количества CPU Зависимости: Windows Автор: Gua, gua@ukr.net, ICQ:141585495, Simferopol Copyright: ©Gua Дата: 15 июля 2002 г. ***************************************************** } functionGetCPUCount: byte; var
si: TSystemInfo; begin
GetSystemInfo(si); Result := si.dwNumberOfProcessors; end
;