RAM-und CPU-AUslastung für die Win7-Taskleiste

[markus5766h]

Hallo,
im Anhang zwei kleine Programme zur quantitativen Anzeige der
RAM- und CPU-Auslastung in der Win7-Taskleiste.
Parameter können mit übergeben werden:

Beispiel : RamWin7.exe 30 60 500

30 : Anzeigebereich für Grün : 0 .. 30 %
60 : Anzeigebereich für Gelb : >30% .. 60%
Anzeigebereich für Rot : >60%
Aktualisiuerungsintervall : 500 ms

werden keine Parameter übergeben :
Grün : 0 .. 50%
Gelb : >50 .. 75%
Rot : >75%
Aktualisierungsintervall : 1000ms

der Vollständigkeit wegen :
RamWin7_64.rar enthält die Version der Speicherabfrage in 64-bit,
d.h. es sollte keine Probleme mehr bei der Abfrage von Speichergrößen
> 4 Gb geben.

[Jonelmeier]

Also das CPU-Tool funktioniert super bei mir, stimmt mit dem Taskmanager überein.
Aber das RAM-Tool zeigt nur die Grüne Marquee Bar, welche immer von Links nach Rechts durchwandert und nicht die RAM Auslastung...

Hab nen Intel Core 2 Duo T7250 mit 2 GHz
4 GB RAM (wegen 32bit nur ca. 3,12)
und 32bit Windows 7 Professional

Gruß

[Mithrandir]

Hab dieselbe Konfiguration (Prozzi nur 1,6 Ghz), bei mir funktionieren beide einwandfrei. ;)

[markus5766h]

@Jonelmeier : hab den Upload noch mal aktualisiert (war evt. noch ein kleiner Fehler).

[Jonelmeier]

Habs nochmal runtergeldaden...das CPU-Tool funktionert noch immer einwandfrei, das RAM-Tool jedoch immer noch nicht.
Jetzt kommt zwar nicht mehr der durchlaufende Grüne Streifen, dafür aber einfach garnichts mehr. Das Programm ist in der Taskleiste zu sehen, aber keine Grüne (oder gelbe / rote) Anzeige, obwohl der Speicher zu ca. 25% voll ist.

Jonas

[markus5766h]

@Jonelmeier :
hab' eben den Download ausprobiert - bei mir laüft das Tool einwandfrei. ??
Hast Du irgendwelche Speichermanager o.ä. laufen ??

Wurde das Programm mit / ohne Parameter gestartet ?

[EWeiss]

Und warum bietest du das Teil nicht als Opensource an ?
Schließlich verwendest du die Unit welche ich im Net gefunden habe.

Auch wenn sie nicht direkt von mir ist.
Nur mal so neben bei ;)

So kann jeder davon lernen.

gruss

[markus5766h]

@EWeiss : kommt.

Quellcode für RamWin7 ist im ersten Beitrag.

[EWeiss]

Zitat:

Zitat von markus5766h

@EWeiss : kommt.

Supi Danke schön in Namen aller :).

gruss

[DP-Maintenance]

Dieses Thema wurde von "fkerber" von "Freeware" nach "Open-Source" verschoben.
Da der Quellecode jetzt dabei ist --> OpenSource ;)

[Jonelmeier]

Zitat:

Zitat von markus5766h

Hast Du irgendwelche Speichermanager o.ä. laufen ??
Wurde das Programm mit / ohne Parameter gestartet ?

Ich hab keinerlei Speichermanager, oder sonstige Optimierungsprogramme o.Ä. laufen...
Mysteriös... :gruebel:
Ich hab's ohne Parameter gestartet, mach aber auch keinen unterschied wenn ich's mit starte...

Jonas

Edit:
Auch wenn ich's bei mir mit Delphi 2009 selbst erzeuge -> gleiches Ergebniss...

[EWeiss]

Hätte noch nen Tip ;)
Für About könntest du ein Icon einbauen 16x16 256 Farben.

Hab mal eins angehängt!

gruss Emil

[markus5766h]

@ Emil Weiss

... ja, macht sich vielleicht ganz gut ...
muss noch den Quellcode für die CPU-Auslastung
'nen bisschen formatieren, bevor ich den hochlade.

Kann ich ja dann mit einbauen ...

[Mithrandir]

Zitat:

Zitat von Jonelmeier

Auch wenn ich's bei mir mit Delphi 2009 selbst erzeuge -> gleiches Ergebniss...

Dann wärs vielleicht gut, wenn dus kurz debuggen würdest, wenn du eh n Delphi zur Hand hast, oder? :gruebel:

[EWeiss]

Zitat:

Zitat von Daniel G

Zitat:

Zitat von Jonelmeier

Auch wenn ich's bei mir mit Delphi 2009 selbst erzeuge -> gleiches Ergebniss...

Dann wärs vielleicht gut, wenn dus kurz debuggen würdest, wenn du eh n Delphi zur Hand hast, oder? :gruebel:

Denk ich auch war der sinn der sache :)

gruss

[Jonelmeier]

Ich hab mir mal die Rückgabe von GlobalMemoryStatus angeguckt, sieht so aus, als würde der Rückgabewert (oder besser die Werte) fehlerhaft sein, oder falsch in TMemoryStatus abgebildet, da dwTotalPhys und dw AvaiablePhys genau High(Longint) sind, und mehr Bytes vorhanden und frei sind, als in Longint reinpasst...

Anbei nochmal ein Screenshot von der Gesamten Rückgabe...

Jonas

[markus5766h]

Hallo,
der Quelltext für CpuWin7 ist im ersten Beitrag.

[Mithrandir]

Ich denke, ich weiß, woran es liegt. In der MSDN steht zu der Funktion "GlobalMemoryStatus" Folgendes unter "Remarks":

Zitat:

Remarks

On computers with more than 4 GB of memory, the GlobalMemoryStatus function can return incorrect information, reporting a value of –1 to indicate an overflow. For this reason, applications should use the GlobalMemoryStatusEx function instead.

On Intel x86 computers with more than 2 GB and less than 4 GB of memory, the GlobalMemoryStatus function will always return 2 GB in the dwTotalPhys member of the MEMORYSTATUS structure. Similarly, if the total available memory is between 2 and 4 GB, the dwAvailPhys member of the MEMORYSTATUS structure will be rounded down to 2 GB. If the executable is linked using the /LARGEADDRESSAWARE linker option, then the GlobalMemoryStatus function will return the correct amount of physical memory in both members.

The information returned by the GlobalMemoryStatus function is volatile. There is no guarantee that two sequential calls to this function will return the same information.

[EWeiss]

Alternativ habe ich noch die Win7Comp von Gumpi
Leider hat er seinen Block und seine Webseite geschlossen daher weiss ich nicht ob ich das hochladen darf.

Readme!

Zitat:

Delphi for Windows: Windows 7 Component Library
================================================== ======================

Simply install the Component Package into your Delphi IDE and you are
set to go. The Packages are in the corresponding folder. As there are no
component editors at the moment, this one package will serve as both -
design-time and run-time.

All Components are installed into the category "Windows 7 Support."

NOTE: You may use the components as-is, without any warranties supplied.
Use them at your own risk.



If you plan to use this code for creating your own component libraries,
you must place them under GPL.

If you plan to use them in any of your applications, you are free to do
so without any further restrictions. I would be honoured if you refer
to me either in your application or in your documentation. For those
cases, the components are given to you with any of the following license
systems: GPL, LPGL, or MPL.

////////////////////////////////////////////////////////////////////////

Components supplied:

TdwProgressBar
Supports showing the progress state in the Windows Taskbar.

TdwTaskbarThumbnails
Adds thumbnails into the preview pane of your application in the
Windows Taskbar.
NOTE: Those thumbnails must be added before any of the
applications GUI is shown. The thumbnails cannot be
reordered, created or deleted after initialization.

TdwOverlayIcon
Adds a overlay icon to your applications icon in the Windows
Taskbar. This work by definition when the user uses large icons
(Windows System Default) only.

TdwJumpLists
Allows you to manage the context menu of your application as shown
in the Windows Taskbar and the Windows Startmenu.

////////////////////////////////////////////////////////////////////////

Have fun,
Daniel Wischnewski
http://www.gumpi.com/blog

Wenn ihr meint das geht werde ich es hochladen da man im Internet nichts mehr findet.
Eigentlich schade drum.
Interessant ist es für Leute die kein Delphi2010 besitzen dort soll so etwas schon enthalten sein.


gruss

[Mithrandir]

Zitat:

Zitat von EWeiss

Alternativ habe ich noch die Win7Comp von Gumpi

Zitat:

Daniel Wischnewski
http://www.gumpi.com/blog

Gumpi? Der heißt doch Sakura... :stupid:

[EWeiss]

Zitat:

Zitat von Daniel G

Zitat:

Zitat von EWeiss

Alternativ habe ich noch die Win7Comp von Gumpi

Zitat:

Daniel Wischnewski
http://www.gumpi.com/blog

Gumpi? Der heißt doch Sakura... :stupid:

Warum hat der seine Block geschlossen?
Hmm wuste ich gar nicht.
Dann kann er ja seine Meinung dazu kundtun bzw.. es selbst hochladen.

EDIT:
Ich brauche es nicht da mein Program in VB geschrieben ist..
Da hat man nicht solche probleme mit COM

gruss

[markus5766h]

Version für Speichergrößen > 4 Gb hochgeladen (RamWin7_64).

[hathor]

Was CpuWin7 und RamWin7 anzeigen sollen, weiss ich nicht.
Nach dem Start sind sie in der Taskleiste - aber zu sehen ist nichts.

WIN 7 64Bit

[markus5766h]

Zitat:

Zitat von hathor (Beitrag 1173846)

Was CpuWin7 und RamWin7 anzeigen sollen, weiss ich nicht.
. . .

WIN 7 64Bit

Speicher- und CPU-Auslastung,
bei mir fuktionierts - Win 7 Ultim. 64-bit

[t.roller]

Delphi Components to Support Windows 7+ features
(by Daniel Wischnewski)
https://github.com/elbereth/Delphi-Win7-Components
https://github.com/elbereth/Delphi-W...ive/master.zip

[Luckie]

sakura gibt es noch? :shock::P

[markus5766h]

CpuWin7.RAR im ersten Post ist aktualisiert,
Anzahl der Cores ist jetzt bis 255 möglich (dyn. Array).

[KodeZwerg]

Macht was es soll, Windwos 10/x64 zeigts brav an. Gute Arbeit!