Показать сообщение отдельно
  #3  
Старый 12.12.2009, 01:24
Аватар для Electronic_Arts
Electronic_Arts Electronic_Arts вне форума
Местный
 
Регистрация: 13.07.2006
Адрес: на земле
Сообщения: 562
Версия Delphi: Delphi 11
Репутация: 18
Восклицание

Тебе надо брат дату с DateTimePicker разделить на дни месяцы годы
так же и реальную дату - тоже разделить - потом есть такая функция DaysBetween называеться спомошю его считать сколько дней осталось от даты до даты

Я написал программу которое тебе нужно - но вижу как наш модер говорит ты ничего не хочешь сделать....по этому я помогу тебе только с определением секунд

Код:
y:=TimeToStr(now);
hour:=Copy(y,1,pos(':',y)-1); delete(y,1,pos(':',y));
min:=Copy(y,1,pos(':',y)-1); delete(y,1,pos(':',y));
sec:=y;
x:=strtoint(hour)*3600+strtoint(min)*60+strtoint(sec);
Ответить с цитированием