3 respuestas en este tema

[egostar]

Hola, después de buscar algunos consejos para leer el consumo de memoria de una aplicación

 

http://delphiaccess....ia-en-servicio/

https://www.devfield...oria-en-delphi/

https://stackoverflo...-delphi-program

 

 

He hecho algunas pruebas pero veo que en los procesos que se están ejecutando en segundo plano no se puede obtener dicha información (adjunto imagen del LOG)

 

¿Hay algo que se pueda hacer para obtener dicha información en los procesos que corren en segundo plano? 

 

Saludos

Archivos adjuntos

•  UsoMemoria.PNG   25,17KB   2 descargas

[escafandra]

Mira a ver si esto te sirve:
 

delphi

procedure TForm1.GetProcessMemory(PID: DWORD);
var
  mc: PROCESS_MEMORY_COUNTERS_EX;
  hProcess: THandle;
begin
  mc.cb:= sizeof(mc);
  hProcess:= OpenProcess(PROCESS_QUERY_INFORMATION or PROCESS_VM_READ, false, PID);
  GetProcessMemoryInfo(hProcess, @mc, sizeof(mc));
  Label1.Caption:= IntToStr(mc.PrivateUsage);
  Label2.Caption:= IntToStr(mc.WorkingSetSize);
end;

Subo proyecto.

Ejecútalo como administrador.


Saludos.

Archivos adjuntos

•  Memory.rar   159,79KB   2 descargas

[egostar]

Muchas gracias amigo escafandra, ya lo veo y comento

 

Saludos

[egostar]

Ya lo he ejecutado y funciona de maravilla, mis respetos amigo escafandra, 

 

Solo le he hecho una modificación (imagen adjunta) que no se hasta que punto sea correcta. 

Saludos

Archivos adjuntos

•  Memoria.png   93,53KB   0 descargas