Discussion :

[PhilLU]

Salut,
Je souhaite connaitre la taille de la mémoire utilisée par une application (.exe)
Merci pour votre aide!
PhilLu

[Caribensila]

Salut,

AllocMemSize, variable

Description

Sous Windows, AllocMemSize représente la taille totale, en octets, de tous les blocs de mémoire actuellement alloués en cours d'utilisation par une application. Utilisez AllocMemSize pour savoir combien d'octets de mémoire utilise actuellement une application.

[nuxtay]

Salut,
il y a aussi la function GetProcessMemoryInfo dans uses psApi

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
uses psApi;
 
function GetMemorySize(ANameProcess: string): Integer;
var
    VHwnd           : LongWord;
    cb              : Cardinal;
    ppsMemCounters  : PPROCESS_MEMORY_COUNTERS;
    dwProcessID     : LongWord;
    Process         : LongWord;
begin
    Result := 0;
    VHwnd := FindWindow(nil,PChar(ANameProcess));
    if VHwnd = ERROR_SUCCESS then
        Exit;
    cb := SizeOf(PROCESS_MEMORY_COUNTERS);
    GetMem(ppsMemCounters, cb);
    ppsMemCounters^.cb := cb;
    GetWindowThreadProcessId(VHwnd, @dwProcessID);
    Process := OpenProcess(PROCESS_ALL_ACCESS, False, dwProcessID);
    if (GetProcessMemoryInfo(Process, ppsMemCounters, cb)) then
        Result := ppsMemCounters^.WorkingSetSize;
    FreeMem(ppsMemCounters);
end;
 
procedure TForm1.Button1Click(Sender: TObject);
begin
    ShowMessage(Format('Process = %d Bytes',[GetMemorySize('Nom du process')]));
end;

@+