Thread: Memory reading

I would like to make something like this, but needing some help:
So I want to know, how to determine when to stop repeat.
Sry my poor english.

Code:

var
  startadd: dword;
  xint: integer;

  //repeat
    readprocessmemory(hProc,ptr(startadd),@xint,4,read);
    inc(startadd);    
  //until startadd=sizeof(memory used by process);

Loops and stuff
Maybe that helps?

Heh, actually I mean, how to get size of process used memory.

Code:

var
Memory:TMemoryStatus;
begin
Memory.dwLength:=Sizeof(Memory);
GlobalMemoryStatus(Memory);
label2.Caption:=floattostr(int(Memory.dwTotalPhys/(1024.0*1024)))+' MB';
label4.Caption:=floattostr(int(Memory.dwAvailPhys/(1024.0*1024)))+' MB';
label6.Caption:=floattostr(int(Memory.dwTotalPageFile/(1024.0*1024)))+' MB';
label8.Caption:=floattostr(int(Memory.dwAvailPageFile/(1024.0*1024)))+' MB';
label10.Caption:=inttostr(Memory.dwMemoryLoad)+' %';

like that?
pick whichever :p