AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Projekte RAM-und CPU-AUslastung für die Win7-Taskleiste

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

Ein Thema von markus5766h · begonnen am 23. Jan 2010 · letzter Beitrag vom 17. Mär 2018
Antwort Antwort
Seite 2 von 3     12 3   
Benutzerbild von markus5766h
markus5766h
Registriert seit: 5. Mär 2009
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.
Miniaturansicht angehängter Grafiken
taskleiste_124.jpg  
Angehängte Dateien
Dateityp: rar ram_181.rar (3,5 KB, 143x aufgerufen)
Dateityp: rar cpu_459.rar (5,6 KB, 162x aufgerufen)
Dateityp: rar RamWin7_64.rar (164,2 KB, 96x aufgerufen)
Dateityp: rar CpuWin7.rar (164,1 KB, 18x aufgerufen)

Geändert von markus5766h (17. Mär 2018 um 19:35 Uhr) Grund: CpuWin7Rar aktualisiert
 
Jonelmeier

 
Delphi XE Starter
 
#11
  Alt 24. Jan 2010, 12:36
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...
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...
Jonas
  Mit Zitat antworten Zitat
EWeiss
 
#12
  Alt 24. Jan 2010, 12:39
Hätte noch nen Tip
Für About könntest du ein Icon einbauen 16x16 256 Farben.

Hab mal eins angehängt!

gruss Emil
Angehängte Dateien
Dateityp: ico advrcntr3.dll__2__195.ico (1,4 KB, 44x aufgerufen)
  Mit Zitat antworten Zitat
Benutzerbild von markus5766h
markus5766h

 
Delphi XE8 Professional
 
#13
  Alt 24. Jan 2010, 12:50
@ 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 ...
Markus H.
  Mit Zitat antworten Zitat
Benutzerbild von Mithrandir
Mithrandir
 
#14
  Alt 24. Jan 2010, 13:37
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?
米斯蘭迪爾
  Mit Zitat antworten Zitat
EWeiss
 
#15
  Alt 24. Jan 2010, 13:49
Zitat von Daniel G:
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?
Denk ich auch war der sinn der sache

gruss
  Mit Zitat antworten Zitat
Jonelmeier

 
Delphi XE Starter
 
#16
  Alt 24. Jan 2010, 14:01
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
Miniaturansicht angehängter Grafiken
screenshot_214.jpg  
Jonas
  Mit Zitat antworten Zitat
Benutzerbild von markus5766h
markus5766h

 
Delphi XE8 Professional
 
#17
  Alt 24. Jan 2010, 14:01
Hallo,
der Quelltext für CpuWin7 ist im ersten Beitrag.
Markus H.
  Mit Zitat antworten Zitat
Benutzerbild von Mithrandir
Mithrandir
 
#18
  Alt 24. Jan 2010, 15:02
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.
米斯蘭迪爾
  Mit Zitat antworten Zitat
EWeiss
 
#19
  Alt 24. Jan 2010, 16:26
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
  Mit Zitat antworten Zitat
Benutzerbild von Mithrandir
Mithrandir
 
#20
  Alt 24. Jan 2010, 16:32
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...
米斯蘭迪爾
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +2. Es ist jetzt 04:37 Uhr.
Powered by vBulletin® Copyright ©2000 - 2021, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2021 by Daniel R. Wolf