Я бы все-таки сделал Exteded Data Types на базе Date или TransDate со свойствами
DateYear = for digits
DateDay = Day not show
Во-первых, автоматически появится иконка для выбора даты из календаря и во-вторых отпадет необходимость контролировать корректность введенного значения. Ну, например, чтобы не ввели 15 месяц.
|