![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как сделать Таймер активирующийся по Вторникам и Четв. в 15:00 [D7, XP]
alucard © (2006-10-13 10:41:00)Подскажите какие компоненты для этого можно использовать?
Спасибо.
alucard (2006-10-13 14:22:00) [1]спасибо.
Neket (2006-10-13 12:01:00) [2]Вместе с TTimer можно использовать
var
Hour, Min, Sec, MSec: Word;
Year, Month, Day: Word;
begin
DecodeTime(Time, Hour, Min, Sec, MSec);
DecodeDate(Date, Year, Month, Day);
Showmessage('Дата-'+DateToStr(Date));
Showmessage('Время-'+TimeToStr(Time));
//----Или по отдельности
Showmessage('Час-'+IntToStr(Hour));
Showmessage('Мин-'+IntToStr(Min));
Showmessage('Сек-'+IntToStr(Msec));
//----Для даты также
Showmessage('Год-'+IntToStr(Year));
Showmessage('Месяц-'+IntToStr(Month));
Showmessage('День-'+IntToStr(Day));
end;
sniknik (2006-10-13 11:03:00) [3]можно использовать стандартную службу заданий... (в стандартных программах "Назначенные задания"), это будет работать намного лучше и надежнее твоего.
palva (2006-10-13 11:00:00) [4]Но ваша программа должна быть постоянно запущена.
Джо (2006-10-13 10:48:00) [5]TTimer.