Autor Beitrag
Delphi2009lover
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 176



BeitragVerfasst: Mo 07.09.09 14:12 
Hallo,

es kann sein dass es so einen Thread schon gibt nur konnte ich damit kaum etwas anfangen...

ich bin auch erst 13 und habe nicht besonders gut Englischkenntnisse


-Ich möchte gerne die CPU auslastung in % und anzeigen ob es ein 4 * 2,0 GHz Prozessor ist z.B. oder ein 2 * 2,3GHz

-Ich möchte gerne angezeigt bekommen wieviel RAM speicher zur verfügung steht... 1GB, 2GB, 3GB, usw

-Ich möchte gern angezeigt bekommen wie viel KB/MB/GB belegt sind



Es sind sehr viele Fragen, aber bitte postet nicht nur LINKS mir sind erklärte Codes lieber ^^

:wink:

Danke schon mal im Vorraus
Dude566
ontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic starofftopic star
Beiträge: 1592
Erhaltene Danke: 79

W8, W7 (Chrome, FF, IE)
Delphi XE2 Pro, Eclipse Juno, VS2012
BeitragVerfasst: Mo 07.09.09 14:26 
Vielleicht hilfts dir ja :roll:
www.delphipraxis.net/post729871.html

_________________
Es gibt 10 Gruppen von Menschen: diejenigen, die das Binärsystem verstehen, und die anderen.
Timosch
ontopic starontopic starontopic starontopic starontopic starofftopic starofftopic starofftopic star
Beiträge: 1314

Debian Squeeze, Win 7 Prof.
D7 Pers
BeitragVerfasst: Mo 07.09.09 15:00 
ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
var SystemInfo : TSystemInfo;
    mem : TMemoryStatus;
begin
GetSystemInfo(systeminfo);
Memo1.Lines.Add('Number of processors: '+IntToStr(systeminfo.dwNumberOfProcessors));
mem.dwLength:=SizeOf(mem);
GlobalMemoryStatus(mem); 
Memo1.Lines.Add('RAM Size: '+IntToStr(mem.dwTotalPhys));
Memo1.Lines.Add('RAM usage(%): '+IntToStr(mem.dwMemoryLoad));
Memo1.Lines.Add('Size of page file: '+IntToStr(mem.dwAvailPageFile)); 
end;

_________________
If liberty means anything at all, it means the right to tell people what they do not want to hear. - George Orwell
Delphi2009lover Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 176



BeitragVerfasst: Mo 07.09.09 15:33 
@ Timosch


Vielen dank dein Code hat Klasse funktioniert und war viel leichter zu verstehen :wink:

Nur müsste ich noch wissen wie man die Prozessorleistung (z.B. 3,2GHrz oder 2,6GHrz)


& halt die ganze CPU Sachen aber schonmal danke
Luckie
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: Mo 07.09.09 15:38 
Schon mal nach "CPU auslastung" und "anzahl cpu kerne" gesucht? Wenn man ein delphior setzt, hilft sogar Google.
Delphi2009lover Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 176



BeitragVerfasst: Mo 07.09.09 16:16 
Nach "CPU Auslastung" habe ich schon gesucht und auch etwas gefunden... aber ich weiß nichtmal wie ich den Code einfügen muss könnte ihr evtl ein Beispiel machen so wie Timosch?
elundril
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 3747
Erhaltene Danke: 123

Windows Vista, Ubuntu
Delphi 7 PE "Codename: Aurora", Eclipse Ganymede
BeitragVerfasst: Mo 07.09.09 16:19 
ich weiß was besseres. du sagst uns was du machen willst und wir programmieren es für dich... :roll:

_________________
This Signature-Space is intentionally left blank.
Bei Beschwerden, bitte den Beschwerdebutton (gekennzeichnet mit PN) verwenden.
Timosch
ontopic starontopic starontopic starontopic starontopic starofftopic starofftopic starofftopic star
Beiträge: 1314

Debian Squeeze, Win 7 Prof.
D7 Pers
BeitragVerfasst: Mo 07.09.09 16:27 
user profile iconDelphi2009lover hat folgendes geschrieben Zum zitierten Posting springen:
Nach "CPU Auslastung" habe ich schon gesucht und auch etwas gefunden... aber ich weiß nichtmal wie ich den Code einfügen muss könnte ihr evtl ein Beispiel machen so wie Timosch?

Beschäftige dich mit den Delphi-Grundlagen, versuchs einfach mal einzufügen und melde dich dann nochmal wenns konkrete Probleme gibt, dann helfen wir dir gerne.
Abgesehen davon: Mein Codebeispiel (das btw nicht von mir stammt) musst du doch auch irgendwie einfügen... Genauso läuft das mit dem Rest auch.

_________________
If liberty means anything at all, it means the right to tell people what they do not want to hear. - George Orwell
Narses
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Administrator
Beiträge: 10183
Erhaltene Danke: 1256

W10ent
TP3 .. D7pro .. D10.2CE
BeitragVerfasst: Mo 07.09.09 17:58 
Moin!

Das kann man alles relativ simpel per WMI abfragen, schau mal hier. :idea:

cu
Narses

_________________
There are 10 types of people - those who understand binary and those who don´t.