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

Вниз

Как в определенное время запустить стороннее приложение?   Найти похожие ветки 

 
dera   (2005-12-23 17:35) [0]

Я делаю так. Ставлю таймер на 1000, в его обработчике пишу
if now=RunTime then begin
   if FileExists("с:\otherprog.exe") then begin
     ShellExecute(0,"otherprog.exe","c:\",nil,nil,SW_SHOWNORMAL);
   end;
end;
Значение переменной RunTime присваивается при старте проги и оно всегда не меньше, чем время запуска самой проги.


 
dera   (2005-12-23 18:21) [1]

почему-то не срабатывает условие. Не играют ли тут роль милисекунды? И что- то другое? Никак не могу разобраться


 
alex-drob ©   (2005-12-23 18:33) [2]

if now>RunTime then


 
dera   (2005-12-23 18:48) [3]

<if now>RunTime then>

Тогда каждую секунду срабатывать будет. Хотя... если остановить таймер.... в моем случае подходит.
Спасибо!


 
begin...end ©   (2005-12-23 20:16) [4]

> dera   (23.12.05 17:35)

Насколько я понял, приложение нужно запустить только один раз. Тогда зачем нужен ежесекундно срабатывающий таймер?

ИМХО, лучше сделать так. При запуске программы (таймер пока не запускаем) узнаём значение RunTime, вычисляем, сколько осталось времени до этого "часа X" (RunTime - Now), переводим это в миллисекунды (умножая разность на 24 * 60 * 60 * 1000 и округляя до целого), и устанавливаем такой интервал таймеру. Запускаем таймер. В результате таймер в первый раз сработает именно тогда, когда нужно. И в обработчике OnTimer не нужно будет никаких вычислений -- нужно будет только выключить таймер, чтобы он не сработал второй раз.

Но недостатки есть и у этого метода...


 
dera   (2005-12-23 20:46) [5]

<begin...end ©   (23.12.05 20:16) [4] >
Отличный способ! Спасибо.



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

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

Наверх




Память: 0.47 MB
Время: 0.029 c
14-1135103436
KOSS
2005-12-20 21:30
2006.01.15
Куда делась вкладка Diagram в Delphi for Microsoft Win32 2006?


14-1135233175
begin...end
2005-12-22 09:32
2006.01.15
С Днём рождения! 22 декабря


14-1135182145
Igorek
2005-12-21 19:22
2006.01.15
С Новым годом!


14-1134716196
Ник (пишу с работы)
2005-12-16 09:56
2006.01.15
ТВ тюнер на winxp


2-1135374392
JEK2
2005-12-24 00:46
2006.01.15
картинку в RichEdit