Потеря памяти

Автор: sunsb.dax.ru

16 мегабайт тому назад...

Если Ваша программа после завершенмя " съест" некоторое количество памяти, Windows тактично об этом умолчит, и ошибка останется не найденной. Поэтому я рекомендую на этапе разработки, в файл проекта вставлять модуль checkMem, который отследит некорректную работу с памятью. Вставлять его нужно первым, для обеспечения чистоты эксперимента. Текст модуля:

unit checkMem;                     
interface
implementation

uses sysUtils, dialogs;
var HPs : THeapStatus;
var HPe : THeapStatus;
var lost: integer;
initialization
   HPs := getHeapStatus;
finalization
   HPe := getHeapStatus;
   Lost:= HPe.TotalAllocated - HPs.TotalAllocated;
   if lost >  0 then begin
      beep;
      ShowMessage( format('lostMem: %d',[ lost ]) );
   end;
end.

Недавно добавленные исходники
• Animation Loaders 672 • DeLiKaTeS Tetris (Тетрис) 5 678 • TDictionary Custom Sort 7 643 • Fast Watermark Sources 7 332 • 3D Designer 10 536 • Sik Screen Capture 7 854 • Patch Maker 8 077 • Айболит (remote control) 8 139 • ListBox Drag & Drop 6 935 • Доска для игры Реверси 100 120 • Графические эффекты 8 196 • Рисование по маске 7 598 • Перетаскивание изображений 6 201 • Canvas Drawing 6 563 • Рисование Луны 6 490 • Поворот изображения 5 668 • Рисование стержней 4 591 • Paint on Shape 3 290 • Генератор кроссвордов 4 280 • Головоломка Paletto 3 418 • Теорема Монжа об окружностях 4 239 • Пазл Numbrix 2 749 • Заборы и коммивояжеры 3 655 • Игра HIP 2 461 • Игра Go (Го) 2 443 • Симулятор лифта 2 853 • Программа укладки плитки 2 293 • Генератор лабиринта 3 014 • Проверка числового ввода 2 514 • HEX View 2 920