В БСП есть функция. Название общего модуля не помню, называется сама функция СтрокаВДату()
Я не хочу быть самым богатым человеком на кладбище. Засыпать с чувством, что за день я сделал какую-нибудь потрясающую вещь — вот что меня интересует. Стив Джобс