|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Создание сервиса на Delphi
В общем у меня такая ситуация. Написал я обычное приложение и с помощью Tservice (делал просто через File-New-Other) создал сервис. Написал в в секции begin все, что должен делать сервис. И теперь мне нужно запустить этот сервис из моего приложения, чтобы он постоянно пока включен ПК висел резидентно, а при выключении удалялся. Но у меня не запускается сервис(( Как я понял сервис нужно сначала установить, а потом запустить.
Пробовал сделать так как написано в ФАКе DS - не получается запустить сервис. Может, кто-нибудь напишет мне самый простой сервис,чтобы он инсталлировался/ деинсталлировался и запускался правильно? |
#2
|
|||
|
|||
Неужели мне тут не помогут?(
|
#3
|
||||
|
||||
Тебе именно сервис нужен или просто чтоб не было видно твоего софта? Спрятать свое приложение можно так:
Код:
ShowWindow(Application.Handle,sw_hide); ShowWindow(FORM1.Handle, SW_HIDE); |
#4
|
|||
|
|||
Именно сервис.
|
#5
|
||||
|
||||
Цитата:
|
#6
|
|||
|
|||
Попытался скомпилировать, выдает вот это:
Пытался исправить эти ошибки - не получилось P.S. Windows 7, Delphi 2009 Последний раз редактировалось Muxa, 30.07.2009 в 15:35. |
#7
|
||||
|
||||
Delphi 7 попробуй - должен работать.
ЗЫ: Привет из Win7 Оставайтесь хорошими людьми... VK id2634397, ds [at] phoenix [dot] dj |
#8
|
||||
|
||||
Цитата:
А так это все конечно Delphi 2009 по всей видимости глючит, так как в D7 все ОК. |
#9
|
|||
|
|||
Пробовал исправить - не получилось( А на Delphi 7 пересаживаться не могу(
|
#10
|
||||
|
||||
Это по какой ж причине (из любопытства)?
Тогда отлавливай ошибку... и ещё кучу ошибок на почве PChar, PANSIChar, string, PWideChar, и им подобным... точнее- ошибки из совместимости... Оставайтесь хорошими людьми... VK id2634397, ds [at] phoenix [dot] dj |
#11
|
|||
|
|||
Не могу пересесть, т.к. за лицензию СG 2009 начальством деньги плачены. С типами ладно - переживем. А на счет 3 ошибки...
|
#12
|
||||
|
||||
Так это... покажи строчку, на которой спотыкается... ответим...
Оставайтесь хорошими людьми... VK id2634397, ds [at] phoenix [dot] dj |
#13
|
|||
|
|||
Ну компилятор же тебе сказал. у тебя не совпадают типы параметров, которые ты передаешь в какую-то функцию. Внимательно смотри и помни, что по умолчанию String в 2009 - это Unicode (т.е. то, что раньше было WideString).
|
#14
|
|||
|
|||
Imikle спасибо) Исправил - работает.
|
#15
|
|||
|
|||
Инсталлирую сервис, а он не отображается в списках служб. В коде идет вроде и инстал и запуск сразу. Может я, я что-то не так делаю?
|