[papis]

Добрый вечер.
Есть такая проблема - пытаюсь найти разницу в минутах даты(со временем) из БД и текущую дату систему, делаю так:

i_minutes: int64;

i_minutes := dateutils.MenutesBetween(form.sql_minutes.FieldVal ue['start_date'], Now).

В результате выполнения i_minutes = 0, хотя формат даты из базы 'dd.mm.yyyy hh.mm.ss'

Подскажите, пожалуйста, что не так делаю? или есть какой-то другой способ проделать такое?

[Страдалецъ]

Попробуйте иначе задавать дату:

Код:

dateutils.MenutesBetween(form.sql_minutes.FieldByName('start_date').AsDateTime, Now).

[papis]

сделал так:

i_minutes: int64;
k: double;

далее

k := Now;
i_minutes := dateutils.MinutesBetween(form1.sql_minutes.Fields. Fields[0].AsDateTime, k);

В итоге i_minutes=0, хотя при пошаговом запуске видно что у даты из БД значение - 39957,772523, а k=39957,971657.

Может еще есть какой-нибудь способ?

[Страдалецъ]

Надо поэкспериментировать..

[Страдалецъ]

Ну незнаю, провел эксперимент с БД. Все нормально возвращает в любом варианте.

[papis]

а можешь написать пример?

а не может глючить из-за того, что у меня vista ultimate x64, а пользуюсь drlphi 7?

[Страдалецъ]

Так я вашим-же примером и воспользовался.
Насчет глюка x64 неуверен, что тут проблема, хотя я на х32 сижу и проверял на D2009

У вас D7 с обновлениями?

[vinni]

Попробуй так:

Код:

D: TDateTime;
...
D := Now - form.sql_minutes.FieldValue['start_date'].AsDateTime;

[papis]

спасибо, за помощь, разобрался!

а не подскажите ещемомент:
как можно по текущей дате вернуть дату первого числа текущего месяца и дату последнего числа текущего месяца, желательно вплоть до секунд?

[Страдалецъ]

Элементарно, для этого есть модуль DateUtils:

Код:

StartOfTheMonth(Now) 
EndOfTheMonth(Now);

[papis]

вот блин... действительно.
спасибо