Wie man die CPU-Belastung mißt ist im Forum zu finden ... darüber gibt's viele Themen (ich glaub einige sogar in der CodeLib)
Falls du keinen Timer nehmen möchte, dann blieben noch etwa 2 Möglichkeiten.
Der Timer wäre eh nir sinnvoll, wenn der Hauptthread nichtausgeleastet ist, denn die Timer werden dort behandelt und falls dort keine Zeit zur Verfügung gestellt wird, so würden die Timer nicht laufen.
1. wenn ein Thread am arbeiten ist, dann könnte man dort in "regelmäßigen" Zeitabständen eine Funktion zur Messung aufrufen
oder 2.
du startest einen extra Thrad, welcher Mißt und sich zwischendurch zur CPU-Entlastung z.B. per Speep abschaltet
Delphi-Quellcode:
Procedure ThreadProc...
Begin
Repeat
messen... // hier den CPU-Code
Sleep(1000);
Until Stop;
End;
Wie man Threads erstellt ist in der
OH (TThread) und im Forum (
TThread /
CreateThread) zu finden