uses
System,
Classes,
LResources,
Controls,
StdCtrls,
LCLType,
Dialogs,
SysUtils,
jinputconsts,
CalendarPopup,
Calendar,
Buttons,
LMessages;