Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.03.02;
Скачать: CL | DM;

Вниз

Сравнить даты   Найти похожие ветки 

 
Dmitry S ©   (2008-02-08 15:29) [0]

Есть два TDateTime - а. Необходимо уточнить, одинаковые ли у них даты.
Так будет верно:

var
A, B: TDateTime;
...
Result := Trunc(A)=Trunc(B);

??


 
ketmar ©   (2008-02-08 15:34) [1]

а отчего нет?

---
Understanding is not required. Only obedience.


 
Джо ©   (2008-02-08 15:41) [2]

> [0] Dmitry S ©   (08.02.08 15:29)
> Есть два TDateTime - а. Необходимо уточнить, одинаковые
> ли у них даты.
> Так будет верно:

Так будет верно.


 
Dmitry S ©   (2008-02-08 15:47) [3]

Спасибо. Я просто смутно помню как хранятся дата и время в типе TDateTime :)


 
engine ©   (2008-02-08 15:49) [4]

> [3] Dmitry S ©   (08.02.08 15:47)

TDateTime =  Double


 
engine ©   (2008-02-08 15:51) [5]

> [4] engine ©   (08.02.08 15:49)

А, не то. Вот то что нужно:
The integral part of a Delphi TDateTime value is the number of days that have passed since 12/30/1899. The fractional part of the TDateTime value is fraction of a 24 hour day that has elapsed.


 
Джо ©   (2008-02-08 16:09) [6]

> [3] Dmitry S ©   (08.02.08 15:47)
> Спасибо. Я просто смутно помню как хранятся дата и время
> в типе TDateTime :)

Когда смутно помнят, читают справку,  освежая смутные воспоминания :)



Страницы: 1 вся ветка

Текущий архив: 2008.03.02;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.012 c
11-1184741940
Volterman
2007-07-18 10:59
2008.03.02
Как правильно работать с Timer?


15-1201617676
fics
2008-01-29 17:41
2008.03.02
Книга по Delphi


2-1202146357
Санек
2008-02-04 20:32
2008.03.02
popupmenu выбор итема


2-1202480632
Thrasher
2008-02-08 17:23
2008.03.02
Обработчик событий OnMouseWheelUp OnMouseWheelDown


2-1201689760
Ell
2008-01-30 13:42
2008.03.02
Нужна помощь