|
|
|
Supreme Being
      
участник
Last Login: 06.02.2003 8:05
Сообщ.: 187,
Visits: 2 058
|
|
Господа, гении программирования!
Как проще всего вычислить разницу между T1 и T2 : TDateTime (в секундах) ? Конечно, при условии, что T1>T2. Миллисекунды учитывать не обязательно.
Это нужно для того, чтобы вывести на экран, сколько секунд осталось до Дня Рождения. T1 - Фиксированная дата в будущем. T2 - текущая дата + время (Now)
С уважением, Akula
|
|
|
|
|
Junior Member
      
участник
Last Login: 29.05.2002 16:02
Сообщ.: 22,
Visits: 243
|
|
var Hour, Min, Sec, MSec: Word;
DecodeTime((T2 - T1), Hour, Min, Sec, MSec);
|
|
|
|
|
Supreme Being
      
участник
Last Login: 21.06.2003 16:36
Сообщ.: 75,
Visits: 826
|
|
Чтобы в секундах, то лучше так:
var x:longint;
x:=trunc((t1-t2)*24*3600);
|
|
|
|