Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как создать сервис ? [D6, Win2k]


slaga ©   (2004-11-18 13:34:00) 

Мне нужно написать такую программу которая была бы сервисомЮ стартовала при запуске вин, была видна в трее, и ее можно было бы с помощью меню из трея стартовать или останавливать ?

Подскажити пути поиска.


Digitman   (2004-11-18 15:18:00) [1]


> slaga ©   (18.11.04 15:12) [9]
> а так можна ?
>
> Тоесть я пишу прогу как всегда, а потом ее перенесу в сервис
> ?


один-в-один нельзя.
алгоритмические принципы реализации сервисов намало отличаются от алгоритмических принципов реализации обычных приложений.


slaga   (2004-11-18 15:12:00) [2]

а так можна ?

Тоесть я пишу прогу как всегда, а потом ее перенесу в сервис ?


Smithson   (2004-11-18 15:07:00) [3]

Сперва напиши свою "прогу", отладь, а уж потом превращай ее в сервис. Судя по вопросам, это у тебя первая попытка, так будет проще всем.


slaga   (2004-11-18 15:05:00) [4]

Тоесть я просто так немогу по F9 запустить и потестить свою прогу ??


slaga   (2004-11-18 14:12:00) [5]

Спасибо, уже лучше :))


Digitman   (2004-11-18 14:05:00) [6]


> slaga ©   (18.11.04 13:49) [2]
> А дальше ?


"Но тут лиса бежала. А может не бежала. А может это страус злой. А может и не злой" (С) "Пластилиновая ворона"


> почему он у меня через 20 сек вываливается


потому что стартовать сервис-приложение нужно именно как сервис-приложение (на то есть SCM как сист.механизм и станд.утилита Service Managment Console как готовая ее оболочка, управляющая инсталлированными сервисами), а не как обычное приложение.

Инсталляция же сервиса в системе выполняется при пом. ком.строки

MyServApp.exe /install


ggs   (2004-11-18 13:58:00) [7]

RTFM ;)
TServiceApplication
Using TServiceApplication

как пример...


slaga   (2004-11-18 13:52:00) [8]

А почему он у меня через 20 сек вываливается.


slaga   (2004-11-18 13:49:00) [9]

А дальше ?


Digitman   (2004-11-18 13:42:00) [10]

File -> New.. -> Service Application


Наверх

Титульная страница Поиск, карта сайта Написать письмо