Czy może ktoś mi powiedzieć jak wykryć liczbe procerów logicznych w Delphi?
Dzięki!
0
0
procedure TForm1.Button1Click(Sender: TObject);
var
Sys:TSystemInfo;
begin
GetSystemInfo(Sys);
with Sys do begin
label1.Caption:='Liczba rdzeni : '+IntToStr(dwNumberOfProcessors) ;
end;
end;
0
Wielkie dzięki! A już myślałem że będę się musiał babrać z GetLogicalProcessorInformation. A tu prosze ... taki banał... Na ekipe z 4programmers zawsze można liczyć!