Как определить количество свободной памяти?

Для определения количества свободной физической памяти в байтах можно использовать функцию:

function MemAvail: LongInt;

но чаще всего, интерес представляет не количество свободных байт, а количество свободных системных ресурсов. Даже при почти полностью свободной памяти может не хватить, этих самых, системных ресурсов.

Для определения количества свободных системных ресурсов в процентах используется функция GetFreeSystemResources:

function GetFreeSystemResources(SysResource: Word): Word;

Параметр SysResource:
GFSR_SYSTEMRESOURCES - Количество свободных системных ресурсов в процентах.
GFSR_GDIRESOURCES - Количество свободных GDI ресурсов в процентах. GDI ресурсы включают указатели контекста, кисти, карандаши, области, шрифты и битовые изображения.
GFSR_USERRESOURCES - Количество свободных пользовательских ресурсов в процентах. Эти ресурсы включают указатели окон и меню.

Пример:

 Label1.Caption := IntToStr(MemAvail DIV 1024)+' Kb'; 
 Label2.Caption := IntToStr(GetFreeSystemResources
                   (GFSR_SYSTEMRESOURCES))+'%';

Последние комментарии

  • Новое интернет казино Адмирал презентует игровые автоматы, в которые http://formlessro.com/forum/index.php?topic=175497.new Игровые автоматы видео онлайн бесплатно. Здесь вы найдете все про онлайн казино Вулка: как играть на http://www.a-riviera.ru/viewtopic.php?f=26&t=6216 Мелодрамы 2015 2016...
  • 90m lesbian pantyhose pb Classic Interracial Sarah Young Takes a Big Black Cock. Hot Asian With Perky Nipples Masturabting. Sexy Blonde, Anal Big Black Cock Breaking My Ass And Taking A Shower. Porn photos of blondes Attractive russian and canadian singles Huge Cum After Days. She saw some teen...
  • [b]Продам iphone 8 (идеальная реплика) в отличном состоянии. [/b] Телефон новый, технических нареканий нет, работает хорошо. [img]http://www.picshare.ru/uploads/180624/E9V10k2k3t.jpg[/img] [b]Полный коплект: коробка, наушники, зарядка.[/b] Продаю срочно, поэтому отдам с большой скидкой. [b]Всего...

Счетчики