Форум: "Основная";
Текущий архив: 2002.07.04;
Скачать: [xml.tar.bz2];
Вниз
Вот ведь задачка... Найти похожие ветки
← →
tovSuhov (2002-06-24 10:12) [0]Мастера, подмогните...Что-то клинануло меня...
Необходимо определить, входит ли указанное время во времянной интервал. Когда задаваемый интервал вида 10:00 - 18:00 (т.е. его начало меньше его конца) все просто:
if ((my_time >= time_begin) and (my_time <= time_end))
then (...)
Но когда интервал такого вида : 22:00 - 6:00
Вот тут начинаются проблемы...
Может кто подскажет алгоритм?
← →
MBo (2002-06-24 10:19) [1]учти дату и все будет хорошо
(или прибавляй 1 при переходе суток)
← →
Kaban (2002-06-24 10:21) [2]Что нибудь типа:
if time_begin + my_time >= time_end then
← →
Канадин Владимир (2002-06-24 11:13) [3]TDateTime в себе содержит день (целая часть) и время (дробная)
← →
kull (2002-06-24 11:13) [4]Я думаю так:
function InInterval(const my_time,time_begin,time_end: тип): Boolean;
begin
Result := (my_time >= time_begin) and
(my_time <= time_end)
or
(time_begin>time_end) and
(InInterval(my_time,time_begin,24:00) or
InInterval(my_time,0:00,time_end));
end;
Зависит от того, конечно какого типа my_time.
← →
tovSuhov (2002-06-24 11:17) [5]Нет...Дело в том, что важно именно время, а не дни...
(Пишу тарификацию)
И поэтому нужно выяснить, что, к примеру, 2:00 входит в отрезок
23:00 - 6:00
← →
Kaban (2002-06-24 11:25) [6]Логика следующая:
if time_begin < time_end then
begin
if my_time between [time_begin, time_end] then
begin
end;
end
else
if not (my_time between [time_end, time_begin]) then
begin
end;
← →
MBo (2002-06-24 11:27) [7]сделай два интервала 22-24 и 00-06
← →
kull (2002-06-24 11:27) [8]
> kull © (24.06.02 11:13)
Так вот тебе и без дней...
← →
tovSuhov (2002-06-24 11:28) [9]Точно!!!
Все гениальное просто! Спасибо!
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.07.04;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.005 c
