Mit den Fingern kommst du an den physischen Speicher...
Delphi-Quellcode:
var
memory: TMemoryStatus;
begin
//Memory ausgeben
memory.dwLength := SizeOf(memory);
GlobalMemoryStatus(memory);
x := memory.dwTotalPhys - memory.dwAvailPhys;
y := memory.dwTotalPhys;
Label1.Caption:=IntToStr(round((x/y)*100))+'% von '+inttostr(Round(y/1024))+' KB';
Das ist der freie phys. Speicher und gesamte physische Speicher.
Da kommt man sehr wohl ran...
Ist da etwas virtuell?
