Форум: "WinAPI";
Текущий архив: 2005.08.21;
Скачать: [xml.tar.bz2];
Внизкак узнать объем памяти занимаемой приложением? Найти похожие ветки
← →
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 вся ветка
Форум: "WinAPI";
Текущий архив: 2005.08.21;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.043 c