Einzelnen Beitrag anzeigen

Master_BB

Registriert seit: 17. Mai 2003
285 Beiträge
 
Delphi 7 Professional
 
#8

Re: Freien Ram ermitteln per .NET

  Alt 16. Jul 2005, 18:24
HIER DIE LÖSUNG
RAM GRÖßE BEKOMMEN

Delphi-Quellcode:
//in MB
function GetMemorySize : int64;
var
  ACounter : PerformanceCounter;
begin
  ACounter := PerformanceCounter.Create('Speicher','Systemcode: Gesamtanzahl Bytes');
  Result := Convert.ToInt64(ACounter.NextValue * 0.001);
end;
FREIE RAM Bytes bekommen
Delphi-Quellcode:
//in Bytes

function GetFreeMemory : int64;
var
  ACounter : PerformanceCounter;
begin
  ACounter := PerformanceCounter.Create('Speicher','Verfügbare Bytes');
  Result := Convert.ToInt64(ACounter.NextValue);
end;
könnte man vieleicht in die Code Libary übernehmen oder?
Wenn das Meer unruhig ist und der Wind die Wellen treibt, erfreut es, vom Strand aus die Mühen eines Anderen zu beobachten.
  Mit Zitat antworten Zitat