Данная библиотека позволяет выгружать из памяти неиспользуемые данные.
Например:
program imFreeTest;
uses memory,memclean;
var
Im1,im2,im3,nil:image;
begin
drawText('BL:'+integertostring(memory.free), 0, 0);
repaint;
im1:=LoadImage('/image.png');//заполняем память
im2:=LoadImage('/image.png');
im3:=LoadImage('/image.png');
drawText('AL:'+integertostring(memory.free), 0, 10);
repaint;
Im1:=nil;//"уничтожение" объектов, обратите внимание,
//изображение nil не загружено
Im2:=nil;
Im3:=nil;
drawText('AD:'+integertostring(memory.free), 0, 20);
repaint;
memclean.clean;//чистка памяти
drawText('AC:'+integertostring(memory.free), 0, 30);
repaint;
delay(20000);
end.