![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Сервис [D6, Win2k]
Romul © (2002-08-30 14:42:00)Мне надо сделать прогу, чтобы она работала как сервис, но на самом деле сама бы с определенной переодичностью (по таймеру) проверяла бы, скажем, существование того или иного файла и в зависимости от этого предпринимала бы действия. Я в Delphi 6 выбрал Service Application все сделал + инсталировал и запустил его, но как туда добавить действие по таймеру не могу понять. Подскажите плиз.
Romul (2002-08-31 12:03:00) [1]А почему ShowMessage не видно? Мне он вобщем-то и не нужен, но все же. На самом деле я хочу каждые, скажем, 5 минут проверять базу данных на изменение, а компутер перед уходом не выключать, а просто выходить из сеанса Администратор, вот собственно и причина написания именно сервиса.
Ученик (2002-08-30 18:06:00) [2]>Romul © (30.08.02 17:55)
В этом случае ShowMessage ничего не покажет, точнее ты его не увидишь, показываться он будет каждые 30 секунд
Reindeer Moss Eater (2002-08-30 18:01:00) [3]Timer1.OnTimer
ZrenBy (2002-08-30 17:59:00) [4]Посмотри SetTimer KillTimer
Romul (2002-08-30 17:55:00) [5]Не, не интерактивный, просто он должен с определенной периодичностью (по таймеру че-то делать). Просто я хочу его как сервис написать, ну просто не в трэй его прятать а так как сервис чтоб он работал. Так как заставить там чего-то по таймеру делаться, в каком событии?
Shaman_Naydak (2002-08-30 17:23:00) [6]Бросай вредные привычки из сервисов с окнами работать..
В лог надо писать
Ученик (2002-08-30 17:18:00) [7]>Romul © (30.08.02 17:09)
А сервис интерактивный ?
Romul (2002-08-30 17:09:00) [8]Up
Romul (2002-08-30 15:06:00) [9]2lenin
Так я добавляю его, а потом в onStart пишу типа Timer1.Enabled:=true, но потом через установленные мною 30 секунд не появляется сообщение ShowMessage("Hi all!");
Anatoly Podgoretsky (2002-08-30 14:49:00) [10]Так это и есть сервис
lenin (2002-08-30 14:46:00) [11]Добавь TTimer