Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.08.21;
Скачать: CL | DM;

Вниз

как узнать объем памяти занимаемой приложением?   Найти похожие ветки 

 
Gold ©   (2005-07-04 14:07) [0]

Вопрос, видимо, уже задавался не раз.. Поиск что-то не работает..
Спасибо..


 
Digitman ©   (2005-07-04 14:15) [1]

никак.


 
alpet ©   (2005-07-04 14:18) [2]

Объем... хм все что приходит на ум = x^3, где x - сторона приложения.


 
gold ©   (2005-07-04 14:19) [3]

как тогда узнает диспетчер задач?


 
gold ©   (2005-07-04 14:20) [4]

>alpet ©   (04.07.05 14:18) [2]
А если приложение не в форме куба? :)


 
Digitman ©   (2005-07-04 14:20) [5]


> как тогда узнает диспетчер задач?


а где ты видел, чтобы какой-то там "диспетчер задач" писал ИМЕННО ТАК :
"объем памяти занимаемой приложением равен тому-то" ?


 
Digitman ©   (2005-07-04 14:22) [6]


> если приложение не в форме куба


вот ежели приложение в форме криволинейной трапеции, тогда - пожалуйста !  ... и память там тебе, и все что угодно, и с боку бантик


 
gold ©   (2005-07-04 14:36) [7]

меня устроит объем, который отображает диспетчер задач


 
Digitman ©   (2005-07-04 14:38) [8]

КАКОЙ такой "объем" ?
и что он тебе даст ?
ты вообще-то понимаешь, что есть "память" в Win32 ?


 
Игорь Шевченко ©   (2005-07-04 14:45) [9]


> меня устроит объем, который отображает диспетчер задач


Он два объема отображает.
Оба определяются вызовом функции PsAPI GetProcessMemoryInfo


 
gold ©   (2005-07-04 14:59) [10]

>Игорь Шевченко ©   (04.07.05 14:45) [9]

На Вашу помощь я и расчитывал, когда вопрос задавал.
а где можно посмотреть синтаксис, еще лучше пример...


 
Ботвин Дмитрий   (2005-07-04 15:21) [11]

Вот так примерно:

uses psAPI;

procedure TForm1.Button1Click(Sender: TObject);
 var
   pmc: PPROCESS_MEMORY_COUNTERS;
   cb: Integer;
 begin
   cb := SizeOf(_PROCESS_MEMORY_COUNTERS);
   GetMem(pmc, cb);
   pmc^.cb := cb;
   if GetProcessMemoryInfo(GetCurrentProcess(), pmc, cb) then
     Label1.Caption := IntToStr(pmc^.WorkingSetSize) + " Bytes"
   else
     Label1.Caption := "Ошибка...";
   FreeMem(pmc);
 end;


 
Игорь Шевченко ©   (2005-07-04 15:24) [12]

gold ©   (04.07.05 14:59) [10]

uses
 PsAPI;

procedure TForm1.Button1Click(Sender: TObject);
begin
 if GetProcessMemoryInfo(GetCurrentProcess, @FCounters,
   SizeOf(FCounters)) then begin
   ShowMessageFmt("Process uses %d Kb physical memory",
     [FCounters.PeakWorkingSetSize div 1024]);
 end;
end;


 
gold ©   (2005-07-04 15:46) [13]

Огромно спасибо


 
isasa ©   (2005-07-04 16:11) [14]

что есть "память" в Win32 ?
:)
доступное для приложения адресное пространство(=2^32-1)


 
Digitman ©   (2005-07-04 16:15) [15]


> isasa ©   (04.07.05 16:11) [14]


> доступное для приложения адресное пространство


это только ВАП.



Страницы: 1 вся ветка

Текущий архив: 2005.08.21;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.025 c
4-1117952010
sour
2005-06-05 10:13
2005.08.21
RAS звонилка


9-1114775613
Alex_C
2005-04-29 15:53
2005.08.21
Алгоритм создания части окружности


8-1112790706
Asic
2005-04-06 16:31
2005.08.21
Видео и Аудио плеер с помощью DSPack a


1-1122645251
ctranik
2005-07-29 17:54
2005.08.21
Вопрос по TreeView-ву


1-1122683948
Alexandr+
2005-07-30 04:39
2005.08.21
Как самое простое преобразовать Хтмл в чистый текст?