Как найти разницу времени?

← →
Павел © (2003-02-24 18:30) [0]

Как найти разницу времени? Пробую:
TDate:=Tdate-Tdate
Не подходит, может кто знает?

← →
Павел © (2003-02-24 20:16) [1]

Ну подскажите кто-нибудь!

var z,x:TDate; begin z:=z+x;//Не подходит end;

← →
Anatoly Podgoretsky © (2003-02-24 20:21) [2]

Что именно так и пишешь?

← →
Павел © (2003-02-24 20:24) [3]

To Anatoly Podgoretsky ©
Почти. Я незнаю как работать с TDate.

← →
jack128 © (2003-02-24 20:24) [4]

если написать так
var d : double; d1,d2 : TDateTime;
begin
....
d := d1-d2; // разница, в днях
end;

← →
Павел © (2003-02-24 20:26) [5]

To jack128 © (24.02.03 20:24)
Спасибо, будем разбирать.

← →
Anatoly Podgoretsky © (2003-02-24 20:30) [6]

Павел © (24.02.03 20:24)
Ответ почти так не подходит, приведи определение переменных Tdate

Дельфи ведет отсчет вовсе не от РХ, плюс в месяцах и годах pазное число дней,
поэтомy такой метод не пpойдет,

Из TDateTime можно вычесть целое число дней:

DateToStr(StrToDate("1.1.1998")-2) выдаст "30.12.1997"

Чтобы вычесть годы и месяцы, если ты не хочешь вычислять сколько в них дней -
сделай DecodeDate, вычти что надо и веpни pезyльтат обpатно.

DateUtils;

DaysBetween, HoursBetween , ... etc

← →
Silver_ (2003-02-26 11:18) [9]

> OlegMsc © (26.02.03 10:06)
> DateUtils;
>
> DaysBetween, HoursBetween , ... etc

+ HoursSpan, MinutesSpan, SecondsSpan + F1 + Good Lack = :))

Как найти разницу времени? Найти похожие ветки