Einzelnen Beitrag anzeigen

Benutzerbild von c113plpbr
c113plpbr

Registriert seit: 18. Nov 2003
Ort: localhost
674 Beiträge
 
Delphi 2005 Professional
 
#2

Re: Speicherauslastung einer Anwendung?

  Alt 14. Aug 2004, 11:54
Es wäre interessant zu wissen wie du es denn bisher versucht hast?

Ich habe mal so ne Speicherauslastungsanzeige für mein programm gemacht, mit GetProcessMemoryInfo, und das hat eigentlich recht gut hingehauen, und immer gaanz genau den Wert gebracht, der im Taskmanger unter Speicherauslastung stand.

Ich habe diesen Code dafür verwendet:
Delphi-Quellcode:
function GetWorkingSetSize : integer;
var
  pmc: PPROCESS_MEMORY_COUNTERS;
  cb: Integer;
begin
  cb := SizeOf(_PROCESS_MEMORY_COUNTERS);
  GetMem(pmc, cb);
  pmc^.cb := cb;
  if(GetProcessMemoryInfo(GetCurrentProcess, pmc, cb))then
    result := pmc^.WorkingSetSize div 1024;
  else
    result := -1;
  FreeMem(pmc);
end;
(hab den code kurz nen bissl umgeschrieben, sollte funzen ...)
Der Code stammt aber ursprünglich auch aus der DP, wenn ich mich nicht irre ...

Für diese Funktion brauchst du aber ein Handle zum Prozess, d.h. dass du per OpenProcess dir eines holen musst ...

ciao, Philipp
Philipp
There is never enough time to do all the nothing you want.
*HABENWILL*
  Mit Zitat antworten Zitat