Автоматичне очищення оперативної пам’яті в delphi

Проект фактично являє собою онлайн сховище вільно поширюваного програмного коду. Свої розробки тут можуть розміщувати всі охочі, а доступ до проектів можна отримати всім користувачам з будь-якої точки світу.

• У нас є бібліотека в якій багато цікавих прикладів коду на різних мовах програмування.

Автоматичне очищення оперативної пам'яті в Delphi

Не так давно, я вже публікував функцію яка дозволяє додатку швидко і якісно очистити оперативну пам'ять займану ним, тим самим розвантаживши систему. Але як я зрозумів з питань приходять на email, не всі до кінця розуміють як можна це використовувати при розробці своєї програми, а тим більше як виконувати цю операцію автоматично, тобто, не напружуючи користувача настирливими повідомленнями типу «Out of memory» і тому подібним .

Відкриваємо код програми і в самому верху в під type оголошуємо нову процедуру.

Опускаємося нижче і вставляємо в тіло програми код самої процедури.

Переходимо на вкладку «System», вибираємо компонент під назвою Timer і перетягуємо його на свою форму.

Виставляємо необхідні настройки для компонента, а саме частота оновлення, тобто частота очищення пам'яті (interval), за стандартом коштує 1 секунда (1000 мілісекунд).

Кількома два рази по значку таймера (поміщеного нами на форму), з'явиться вікно з кодом.
У тіло процедури (між begin і end) вставляємо нехитру рядок:

Ось і все, тепер ваша програма автоматично буде очищати оперативну пам'ять із заданим інтервалом. Можна звичайно викликати дану поцедуру і після виконання будь-яких складних дій, тут вже вам допоможе лише ваша фантазія.