Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Почтовая рассылка

Подписчиков: -1
Последний выпуск: 19.06.2015

Дельфи и Панель Задач Форточек

3.0K
13 января 2003 года
vasiliy
2 / / 13.01.2003
:eek: :eek: :eek: :eek: :eek:

Как написать простейший "будильник" на Дельфах ???
Как воспользоваться Назначенными заданиями Вындоуз??

В общем, смысл такой: надо выполнить действо в назначенное время.

Спасибо.
8-)
2.8K
14 января 2003 года
DennnyK
7 / / 13.01.2003
Цитата:
Originally posted by vasiliy
В общем, смысл такой: надо выполнить действо в назначенное время.
Спасибо.
8-)


Планировщик есть не в каждой винде IMHO!

Я бы написал процедуру прохода по списку событий с проверкой на достижение момента исполнения + запуск самого исполнения. И запустил бы её на исполнение в бэкгроунде (CreateThread и всё такое). Вот ...

525
15 января 2003 года
December
82 / / 20.08.2000
Цитата:
Originally posted by vasiliy
:eek: :eek: :eek: :eek: :eek:

Как написать простейший "будильник" на Дельфах ???
Как воспользоваться Назначенными заданиями Вындоуз??

В общем, смысл такой: надо выполнить действо в назначенное время.

Спасибо.
8-)


А лучше просто взять TTimer, и на нём всё построить. Если хочешь, могу кинуть исходники своего будильника.

2.8K
19 января 2003 года
inm
4 / / 19.01.2003
Цитата:
Originally posted by vasiliy
:eek: :eek: :eek: :eek: :eek:
В общем, смысл такой: надо выполнить действо в назначенное время.



--------------------------------------------------
procedure TForm1.Timer1Timer(Sender: TObject);
var t:TDateTime;
begin
t:=Time;
if pr then MessageBeep(MB_ICONHAND)
else if pos('7:00:00',TimeToStr(t))<>0 then pr:=true;
end;
--------------------------------------------------

Чтобы поместить иконку рядом с часами я пользовался компонентом CoolTrayIcon:
URL http://www.dxfania.boom.ru/stuff/delphi/components/cooltray.rar
(скачивал давно, ссылка может уже не работать)

3.0K
22 января 2003 года
vasiliy
2 / / 13.01.2003
Давай, кидай исходники.
525
22 января 2003 года
December
82 / / 20.08.2000
Цитата:
Originally posted by vasiliy
Давай, кидай исходники.


Давай мыло.

Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог