Половина, то что описано нигде не задействована. Скажем в процедуре:
FormActivate описаны переменные Present,Year, Month, Day. Они в теле процедуры никак не обрабатываются и оптимизатор их вообще проигнорирует. Описание массива недели месяца тоже нигде в модуле не используются, и если этот модуль в программе более нигде не вызывается тоже будут проигнорированы оптимизатором.
Вы пишете, что полностью дали unit1,unit2 - не похоже, наблюдается только какой-то один из юнитов, скорее всего unit1
__________________
Жизнь такова какова она есть и больше никакова.
Помогаю за спасибо.
|