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

Вниз

Работа со временем   Найти похожие ветки 

 
NeoPlayer ©   (2005-06-27 05:23) [0]

Неправильно обрабатывает данные:
dTime:=Now;//Получаю текущее время - 06:15:23
If (dTime>=StrToTime("08:00:00")) and (dTime<StrToTime("17:00:00")) Then
status:=0;
If (dTime>=StrToTime("17:00:00")) and (dTime<StrToTime("23:00:00")) Then
status:=1;
if (dTime>=StrToTime("23:00:00")) and (dTime<StrToTime("08:00:00")) Then
status:=2;

Но выдаёт почему-то status=0
Почему? И как правильно сравнивать время.


 
Antonn ©   (2005-06-27 05:36) [1]


> StrToTime

formatdatetime("HH:NN:SS",now)


 
Юрий Зотов ©   (2005-06-27 05:53) [2]

> NeoPlayer ©   (27.06.05 05:23)

1. Замените Now на Time. Детали см. в справке.

2. Как это может работать:
if (dTime>=StrToTime("23:00:00")) and (dTime<StrToTime("08:00:00")) Then

Если время больше 23:00, то как оно может быть еще и меньше 8:00 ?


 
sniknik ©   (2005-06-27 08:52) [3]

> Если время больше 23:00, то как оно может быть еще и меньше 8:00 ?
так это наверное 8 часов следующего дня.

> И как правильно сравнивать время.
в твоем случае видимо правильно сравнивать вместе с датой.


 
evvcom ©   (2005-06-27 09:16) [4]


> видимо правильно сравнивать вместе с датой

А что, еще и дата есть? :)

В его случае, возможно, достаточно будет в 3-ем сравнении заменить "and" на "or".


 
Yuri Btr ©   (2005-06-27 11:17) [5]

to NeoPlayer ©  
Это звонилка ? :)
Вообще то лучше извлекать час функцией HourOf (Now) и сравнивать его с 8, 17, 23


 
NeoPlayer ©   (2005-06-27 14:38) [6]

Большое спасибо Yuri Btr за очень дельный совет, не знал -  исправлюсь.



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

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

Наверх




Память: 0.47 MB
Время: 0.059 c
14-1119880085
_Anton
2005-06-27 17:48
2005.07.18
Пустой буфер при GetFieldData


11-1102852673
kosend
2004-12-12 14:57
2005.07.18
Добавление новой формы


8-1111349902
qwertyuiop
2005-03-20 23:18
2005.07.18
DirectDraw.pas чего-то не компилируется в Delhi7


1-1119359444
Алена
2005-06-21 17:10
2005.07.18
Запуск из Delphi приложения с ключиками


4-1116665523
Никита
2005-05-21 12:52
2005.07.18
Как получить количество пикселей на дюйм с помощью GetDeviceCap