Показать сообщение отдельно
  #2  
Старый 01.10.2012, 12:23
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

нужно перенести условие проверки даты из 2-ой процедуры в 1-ую функцию. в функцию можно добавить еще один параметр - дату.
__________________
Пишу программы за еду.
__________________
Ответить с цитированием