Я можно сказать такие календарики коллекционирую.

Однажды долго искал себе подхоящий
в итоги нашел около десятка разных и не очень,
и всё равно переделал по-своему оказался похож на твой

значит отметил плюсы
-показывает сегодн.дату
-показывает ранее выб дату
-маленький
-всплывает под контралом
остальное как у всех календарей

минусы
-дизайн так себе
-отображает заголовок формы
-нет кнопок Ок и канцел ( юзера не догадаються DblClick -это очень сложно)
-Код закрытия формы при щелчке вне календаря - лишнее или нет см.выше
-нет кнопок быстрого перехода по годам

а код конечно уже знаком
тока зачем модуль с function AddrOf для ассеssa2000-02
таm уже есть AddressOf procedurename