CPU-Auslastung bei Berechnungen regeln

[DarkLord0]

Hallo,

Ich brauche eine Möglichkeit, die CPU-Auslastung, die eine Anwendung während Berechnungen verursacht, zu regeln, also reduzieren zu können. Wenn ein Programm beispielsweise sehr viele Berechnungen durchführen muss (oder z.B. eine große Datei schreibt), die ein paar Minuten dauern, verursachen solche Programme bei mir immer 98bis99 % CPU-Auslastung. Das Programm selbst reagiert dabei überhaupt nicht mehr und das ganze System wird verlangsamt. Ich habe schon versucht die Priorität des ganzen Programmes mit SetPriorityClass runterzuregeln, aber das hat nichts genützt.
Ich benutze Delphi 6.

tia,
DarkLord0

[Tubos]

Zitat:

Ich habe schon versucht die Priorität des ganzen Programmes mit SetPriorityClass runterzuregeln, aber das hat nichts genützt.

Das sollte aber funktionieren!
Wenn du die Priorität herabsetzt, lastet das Programm wenn es alleine ist weiterhin die CPU voll aus, aber sobald ein anderes Programm Rechenzeit benötigt bekommt es den Vorzug.

[Joe24]

Versuch mal diesen Befehl in die Prozessorlastige Methode einzubauen,
evtl. direkt in die Schleifen, falls vorhanden.

Delphi-Quellcode:

Application.Processmessages;

[Luckie]

Das wird an der Situation nichts ändern. Die Methode Processmessages sorgt nur dafür, dass Nachrichtenschlange abgerabeitet wird.

Wie Tubos schon gesagt hat, wenn der Prozess alleine läuft, wird er immer ca. 99% der Rechenzeit bekommen, wenn man ihn nicht bremst mit Sleep. Aber warum sollte man das tun? Überlegen, ob man was falsch gemacht hat, sollte man nur, wenn er keine Rechenzeit abgibt, wenn andere Prozesse sie benötigen. An der Priorität würde ich nichts ändern. In das Scheduling von Wiondows eingreifen, bringt selten was.

[DarkLord0]

das wichtigste problem ist ja, dass die anwendung selbst nicht mehr reagiert.
wenn ich beispielsweise die berechnungen durch das klicken auf einen button auslösen lasse,
wird der button weiterhin heruntergedrückt dargestellt, bis die berechnung fertig ist. das programm empfängt zwar andere (z.B. onClick) events, arbeitet diese aber erst ab, nachdem die berechnung beendet ist. das programm wird also quasi "eingefroren" (wobei änderungen, die durch die buttonclick prozedur selber gemacht werden, trotzdem dargestellt werden).
Der Ansatz mit Application.Processmessages; hat übrigends leider auch nicht geholfen

[Luckie]

Zitat:

Zitat von DarkLord0

Der Ansatz mit Application.Processmessages; hat übrigends leider auch nicht geholfen

Das sollte aber dein Fenster wieder reagieren lassen. Besser wären allerdings Threads.

[Tubos]

Die beste Lösung sind sicherlich Threads.
Luckie hat da ein tolles Tutorial geschrieben: http://www.luckie-online.de/Tutorials/

[DarkLord0]

Zitat:

Zitat von Luckie

Zitat:

Zitat von DarkLord0

Der Ansatz mit Application.Processmessages; hat übrigends leider auch nicht geholfen

Das sollte aber dein Fenster wieder reagieren lassen. Besser wären allerdings Threads.

Sorry, da hatte ich einen Fehler gemacht. Ich habe den Befehl nochmal in *alle* wichtigen Schleifen geschrieben und jetzt reagiert das programm wieder.
danke, joe24, das war genau das, was ich gesucht habe :)

[Luckie]

ABER: Das ist nicht das Allheilmittel! Erstens macht dein Programm so lange niuchts, wie es Nachrichten von Windows Bekommt. Schieb es mal andauernt hin und her und du wirst sehen, was ich meine. Und zweitens kann das ungeahnte Nebeneffekte haben. Threads wären wohl wirklich die bessere und sauberere Lösung.

[DarkLord0]

was könnten das denn für "ungeahnte nebeneffekte" sein, bzw wo würden die herrühren ?