Moin !

Kann mir jemand einen Tip geben wie man im Programm die CPU Last am sinnvollsten neben dem eigentlichen Programmablauf erfassen kann?

Das ginge sicher über einen Timer, aber vielleicht hat einer eine bessere Lösung dazu (und evtl. auch ein Codeschnippel ?).

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

markieren

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

Was willst Du erreichen? Feststellen wie lange deine Funktionen brauchen um die Hotspots des CPU verbrauchs zu erkennen oder hat das einen anderen Grund?

Moin !

Zitat:

Was willst Du erreichen?

Ich möchte die CPU Last mitschreiben während unser Prog läuft. Wenn die CPU zu stark beansprucht wird, dann kann es in unserem Prog ab und an zu Problemen kommen weil z.B. die serielle Schnittstelle nicht mehr reagiert.
Wenn ich nun aber vom User eine CPU Lastkurve bekomme, dann kann ich def. schon mal sagen er soll es mit einem anderen Rechner oder weniger laufenden Programmen probieren.
Aussdem könnten wir damit die CPU Last bei Langzeitmessungen mit unserer Software beobachten.

Greetz

Zitat von moelski:

Ich möchte die CPU Last mitschreiben während unser Prog läuft. Wenn die CPU zu stark beansprucht wird, dann kann es in unserem Prog ab und an zu Problemen kommen weil z.B. die serielle Schnittstelle nicht mehr reagiert.

Dann sehe ich aber eher ein Designproblem der Anwendung. Evtl. würd es etwas bringen diesen Teil in einem High-Prior-Thread zu verlageren und entsprechende Unkritische Datenübertragung zu implementieren.

Zitat von moelski:

Aussdem könnten wir damit die CPU Last bei Langzeitmessungen mit unserer Software beobachten.

Und was versprichst du dir davon? Ich würde eher mit AQTime die Hotspots herausfinden und diese entschärfen.

Wenn du die CPU-Last hast und von Problemen weißt, dann kannst du doch auch was dagegen machen?

z.B. dem Thread der serielle Schnittstelle eine höhere Priorität geben
und wenn dann noch nötig winzige Entlastungspausen (je nach aktueller Last) an relevanten Programmstellen (da vor zuviel gerechnet wird) aktivieren.


z.B.:

zusammenfalten · markieren

Delphi-Quellcode:

Var CPULast: Integer;


Procedure ThreadProc...
  Var i: Integer;

  Begin
    Repeat
      i := messen; // z.B. i = CPULast in %
      InterlockedExchange(CPULast, i);
      Sleep(1000);
    Until Stop;
  End;


// und dann sowas an allen relevanten Stellen
If CPULast > 90 Then Sleep(10);