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

Вниз

Как вычислить количество дней с определенной даты до согедня???   Найти похожие ветки 

 
Sirus ©   (2002-04-30 09:53) [0]

Привет...
Подскажите как можно вычислить количество дней с определенной даты до сегодняшнего дня...


 
Song ©   (2002-04-30 09:56) [1]

ShowMessage(IntToStr(DateOf(DateTimePicker1.Date)-DateOf(Date)));


 
Johnmen ©   (2002-04-30 10:03) [2]

... или ShowMessage(IntToStr(Round(Date-DateBegin)));




 
Anatoly Podgoretsky ©   (2002-04-30 10:12) [3]

ABS(Trunc(D1)-Trunc(D1))


 
Johnmen ©   (2002-04-30 10:24) [4]

>Anatoly Podgoretsky ©
Смотря как понимать вопрос : целое количество суток или житейское количество дней (это когда в 0:05 говорят про предшествующие 23:55 "вчера") :)))))


 
Song ©   (2002-04-30 10:36) [5]

2Johnmen © (30.04.02 10:03)
Ваш вариант не совсем правильный, потому что стандартный тип TDateTime содержит составляющую Time. Для правильного определния кол-ва дней нужно отсечь эту составляющую через Trunc или DateOf


 
Johnmen ©   (2002-04-30 10:47) [6]

>Song © см. Johnmen © (30.04.02 10:24)
И попрошу мне не выкать - предпочитаю на "ты" :)


 
Sirus ©   (2002-04-30 11:55) [7]

> Anatoly Podgoretsky © and Johnmen ©
Спасибо огромное... очень признателен что за такое короткое время получил столько ответов


 
Art1   (2002-04-30 12:21) [8]

Люди, как понимать ваши ответы: зачем просто если можна сложно?
var d1,d2,d3: TDate;
begin
d3:=d1-d2;
end;
Вот и все - разница в целых днях.


 
Song ©   (2002-04-30 13:01) [9]

ууу, какой Вы умный, а мы не так написали?


 
Anatoly Podgoretsky ©   (2002-04-30 13:13) [10]

Song © (30.04.02 13:01)
Мы написали не так! Мы написали правильно, именно количество дней, единственно, что остается так это выбор нужного алгоритма в зависимости от задачи. А вот он написал неправильно.
Вчера в чате было обсуждение, на вопрос что такое для тебя день человек ответил - это когда прошло 24 часа, для этого случая отсекать время нельзя, на ответ же это разница между датами, отсекать обязательно, так например меду двумя периодами может пройти одна секунда, но ответ будет один день.
Главное что Sirus знал что именно он хочет и тогда выюерет нужный ему вариант, за исключением последнего ответа, все остальные правильные, да и послдений тоже, просто результат представлен с дробной частью.



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

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

Наверх




Память: 0.49 MB
Время: 0.024 c
3-49840
Andrew Ustinov
2002-04-19 05:58
2002.05.16
Есть ли в IB аналог Oracle-ового decode()


3-49843
kubik
2002-04-19 00:10
2002.05.16
хитрый SQL


3-49884
phantom2040
2002-04-19 08:26
2002.05.16
Сортировка таблицы DBase


14-50096
Yuraz
2002-04-06 11:01
2002.05.16
Как доустановить Delphi5


1-49972
nejest
2002-04-30 07:52
2002.05.16
Скролинг и выделения в StingGrid