Главная страница
    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.45 MB
Время: 0.013 c
14-1134751968
KvORubin
2005-12-16 19:52
2006.01.15
Ув. Знатоки !!! подскажите коротким словом


14-1135118586
версия для печати
2005-12-21 01:43
2006.01.15
Независимость, что она дает?


2-1135608062
Profi
2005-12-26 17:41
2006.01.15
Странности с TComboBox ом


14-1134742530
Kerk
2005-12-16 17:15
2006.01.15
Архитектура Google


4-1131409177
Volf_555
2005-11-08 03:19
2006.01.15
Как в своей программе отловить выключение компьютера?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский