Скачать: CL | DM;

TDateTime   Найти похожие ветки 

← →
аа2   (2008-02-04 21:15) [0]

Как следует правильно сравнивать две переменные TDateTime? Необходимо узнать, какая из дат "больше" - "т.е. ближе к Now".

---

← →
Amoeba ©   (2008-02-04 21:18) [1]

Так и сравнивай - как два обычных числа, поскольку
type  TDateTime = type Double;

---

← →
palva ©   (2008-02-04 23:00) [2]

> Необходимо узнать, какая из дат "больше" - "т.е. ближе к Now".

ближе к Now не всегда бывает больше.

---

← →
Семеныч   (2008-02-04 23:49) [3]

function SelectNearestDate(Date1, Date2: TDateTime): TDateTime;
var
 D: TDateTime;
begin
 D := Now;
 if Abs(Date1 - D) < Abs(Date2 - D) then
   Result := Date1
 else
   Result := Date2
end;

---

← →
Amoeba ©   (2008-02-05 02:10) [4]

> Семеныч   (04.02.08 23:49) [3]

Ну ты и альтруист! Зачем молодежь развращаешь? Да и собственных пальцев тебе не жаль.

P.S. Не тот это случай, чтобы вместо удочки давать рыбу. Ведь сей отрок и оборзеть может.

---

← →
Германн ©   (2008-02-05 02:15) [5]

> Amoeba ©   (05.02.08 02:10) [4]

Через пару месяцев он "остынет". :)
Такое уже было много-много раз.

---

← →
Семеныч   (2008-02-06 12:15) [6]

> Amoeba ©   (05.02.08 02:10) [4]

> Ну ты и альтруист!
Отдаю долги.

> Зачем молодежь развращаешь?
Детский учебный примерчик для разбора и осмысления. Нормально.

> Да и собственных пальцев тебе не жаль.
Полминуты топтания клавы - не в лом. Ты в "прочее" загляни... как там с курением борются... гы... я тащусь...

> вместо удочки давать рыбу
Дать удочку тоже мало. Надо еще научить ею пользоваться. Странно, но об этой очевидной вещи обычно забывают.

> Ведь сей отрок и оборзеть может.
Это ни из чего не следует. Если оборзеет - огребет, здесь таких не любят (насколько я успел заметить). А пока что - презумпция невиновности.

---

← →
Правильный_Вася   (2008-02-06 17:20) [7]

> ближе к Now не всегда бывает больше.

очень верное замечание
даже для будущего календарь уже расписан

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.016 c