IPB
ЛогинПароль:

> ВНИМАНИЕ!

Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.

> Timer+???
dark0ut
сообщение 18.03.2003 14:28
Сообщение #1


Пионер
**

Группа: Пользователи
Сообщений: 53
Пол: Мужской

Репутация: -  0  +


Подскажите реализацию следуюшего алгоритма:
нужно чтобы через определенный интервал (например 5-7 минут) последовательно запускались нужные приложения. Например, в 15:00 запустить калькулятор, а в 15:05 - IE. Это должно происходить автоматически. Также нужно, чтобы можно было время устанавливать вручную и выбирать интервал (например 5,10,20 мин и т.д.)


--------------------
Админ StudCity.RU
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
Vit
сообщение 18.03.2003 21:58
Сообщение #2


Бывалый
***

Группа: Пользователи
Сообщений: 156
Пол: Мужской

Репутация: -  0  +


Поставь глобальную переменную (j), а на таймер поставь что-то типа (если всего прилрожений 3, если больше то видоизмени код):

Код
inc(j);
Case (j mod 3) of
 0:; {запуск "программы1"}
 1:; {запуск "программы2"}
 2:; {запуск "программы3"}
End;


Добавлено (18.03.03 21:02):
Ага например кладёшь memo на форму, устанавливаешь интервал таймера на нужный интервал, в обработчике таймера пишешь код:

Код
inc(j); // глобальная переменная - описываешь сразу после Uses модуля.
ShellExecute(...,Memo1.lines[j mod Memo1.lines.count],...);


Таким образом будут запускаться все приложения которые написаны в Memo по порядку.


--------------------
With the best regards Vit

Все всегда уезжают навсегда. Вернуться невозможно-вместо нас всегда возвращается кто-то другой
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме
dark0ut   Timer+???   18.03.2003 14:28
___ALex___   Re: Timer+???   18.03.2003 21:38
Vit   Re: Timer+???   18.03.2003 21:58
___ALex___   Re: Timer+???   19.03.2003 17:37
Vit   Re: Timer+???   19.03.2003 19:31
___ALex___   Re: Timer+???   19.03.2003 21:21
Vit   Re: Timer+???   19.03.2003 22:30
mj   Re: Timer+???   23.04.2003 0:16


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия 21.06.2025 7:14
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"