VPF::Расчет разницы между двумя значениями времени

Sanych

Дата 4.3.2010, 14:44 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 7
Регистрация: 10.2.2010

Репутация: нет
Всего: нет

Здравствуйте, есть задача найти разницу между двуми значениями времени в минутах. Например 23:00 и 23:40 - разница 40 минут.
Ф-ция MinutesBetween не подходит, тк в случае с 23:00 и 01:00 она выдает 1319 минут, т.е. считает разницу от 01:00 до 23:00, а в данном случае надо получить 120 минут!

UPD: Чет я стормознул, решение найдено. Мб кому понадобиться: Сравниваем 1ое и 2ое значение, и в случае, если 2ое меньше первого, то увеличиваем дату.

Это сообщение отредактировал(а) Sanych - 4.3.2010, 16:48

pseud

Дата 5.3.2010, 16:35 (ссылка)

(нет голосов)

Загрузка ...

Экспёрт Тыдыщ

Профиль
Группа: Завсегдатай
Сообщений: 1175
Регистрация: 18.5.2007
Где: Минск, Беларусь

Репутация: 10
Всего: 40

Цитата(Sanych @ 4.3.2010, 14:44

)

UPD: Чет я стормознул, решение найдено. Мб кому понадобиться: Сравниваем 1ое и 2ое значение, и в случае, если 2ое меньше первого, то увеличиваем дату.

Цитата

MinutesBetween function
Returns the number of minutes between two specified TDateTime values.

т.е. никого никуда вычитать не надо. дай в функцию нормальные TDateTime значения и получишь нормальную разницу:
Код

Код


  MinutesBetween(StrToDateTime('01.01.2010 23:00'), StrToDateTime('02.01.2010 1:00'));

нормально возвращает 119.
А код

Код


  MinutesBetween(StrToDateTime('01.01.2010 23:00'), StrToDateTime('01.01.2010 1:00'));

нормально возвращает 1320.

--------------------

Испытание чужого терпения можно считать успешным, если оно лопнуло...

Sanych

Дата 6.3.2010, 18:40 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 7
Регистрация: 10.2.2010

Репутация: нет
Всего: нет

Цитата(pseud @ 5.3.2010, 16:35

)

дай в функцию нормальные TDateTime значения и получишь нормальную разницу

в том то и дело, что мне известно только время...

Это сообщение отредактировал(а) Sanych - 6.3.2010, 18:41

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »