Forum: Win32/Win64 API (native code)
by GPRSNerd,
5. Jun 2013
Zu den Zeiten, wenn GetCPUUsage negative Werte zurückgibt, zeigen alle anderen Programme 0 an, dementsprechend runde ich die Werte auf Minimal 0 auf:
procedure TTestForm.TimerTimer(Sender: TObject);
var
i: Integer;
Last: Double;
begin
CollectCPUData;
MInfo.Lines.BeginUpdate;
for i:=0 to GetCPUCount-1 do
begin
Forum: Win32/Win64 API (native code)
by GPRSNerd,
5. Jun 2013
Ich habe mal ein anderes Tool und den Taskmanager mit CPU-Aussteuerung für alle Kerne gegen die Demo laufen lassen und es sieht für mich so aus, als ob immer die höchste CPU (in meinem Fall #4) den Durchschnittswert ausgibt.
CPU #0 bis #3 sind die einzelnen Kerne.
Kann das jemand bestätigen?
(getestet unter Win7 64bit Ultimate, kompiliert mit XE4 32bit)