[Alegun]

А вот так разве нельзя

Код:

Label1.Caption:= IntToStr(DaysBetween(DateTimePicker1.Date, StrToDate(Edit1.Text)));

высчитывается разница между двумя датами в днях, а можно в чём угодно, хоть в секундах, см. юнит DateUtils