Новый день?

← →
SergeyDon (2002-05-16 10:08) [0]

Интересно как можно узнать что наступил новый день?
Какое сообшение надо ловить?

← →
Song © (2002-05-16 10:35) [1]

Посмотри в окно :))

(Не надо сообщений ловить, анализируй Time)

← →
SergeyDon (2002-05-16 12:29) [2]

re (Не надо сообщений ловить, анализируй Time)

так программа будет потреблять постоянно ресуры процесорра пусть минимальные но всёже.

← →
Ally © (2002-05-16 12:35) [3]

Song прав.
По крайней мере сообщения типа WM_NEWDAY пока нигде не описано :)

← →
Игорь Шевченко © (2002-05-16 12:48) [4]

Зато описано сообщение WM_TIMER, при обработке которого можно анализировать time.

С уважением,

← →
Reindeer Moss Eater (2002-05-16 12:49) [5]

Это смотря как программа будет ждать. Можно ведь и 100% съесть при этом

← →
SergeyDon (2002-05-16 12:58) [6]

не 100% это интересно как надо сделать?

Значит вариант предлагаете через таймер?

← →
Reindeer Moss Eater (2002-05-16 13:04) [7]

Да банальный цикл я предлагаю, но с адаптивной подстройкой интервала засыпания

← →
gate A20 (2002-05-18 15:52) [8]

имхо следует создать объект WaitableTimer с выставленым интервалом в сутки (там есть пара приколов - UNC и прочее. Всё это хозяйство описано у Рихтера в главе9 раздел4), ждать его и каого-нить ещё Event"а на терминэйт, ждать это добро WaitForMultipleObjects"ом, и есессно, всё это в отдельный поток запихать.

Таймер много ресурсов не ест

← →
слон (2002-05-20 07:53) [10]

var
OLD_DATE: TDateTime;

procedure Timer1Time(..);
begin
if OLD_DATE <> DATE then
begin
OLD_DATE := DATE;
ShowMessage("Happy new day or date changed!")
end
end;

Новый день? Найти похожие ветки