Speicherauslastung einer Anwendung?

[c113plpbr]

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