Galkov, нижняя точка нужна, или нет, типа -- Result? Есть возможность использовать встроенный парсер для разбора значения даты (не времени) формата TDateTime на составные целочисленные значения (год, месяц, день, день недели), можно тоже применить.
А что, еще применяет даты, кроме DatePicker'a? Мне кажется, файловые операции лучше не трогать, там тоже встречается обращение к системным датам. А в DatePicker'е, вместо текстовой форматной строки выдать число формата TDateTime, правильно я понял? Может лучше точку добавить, а старое оставить для совместимости?