[Muxa]

В общем у меня такая ситуация. Написал я обычное приложение и с помощью Tservice (делал просто через File-New-Other) создал сервис. Написал в в секции begin все, что должен делать сервис. И теперь мне нужно запустить этот сервис из моего приложения, чтобы он постоянно пока включен ПК висел резидентно, а при выключении удалялся. Но у меня не запускается сервис(( Как я понял сервис нужно сначала установить, а потом запустить.

http://www.delphisources.ru/pages/fa...ices_work.html
http://www.delphisources.ru/pages/fa..._services.html

Пробовал сделать так как написано в ФАКе DS - не получается запустить сервис. Может, кто-нибудь напишет мне самый простой сервис,чтобы он инсталлировался/ деинсталлировался и запускался правильно?

[Muxa]

Неужели мне тут не помогут?(

[TOJluK]

Тебе именно сервис нужен или просто чтоб не было видно твоего софта? Спрятать свое приложение можно так:

Код:

 ShowWindow(Application.Handle,sw_hide);
 ShowWindow(FORM1.Handle, SW_HIDE);

будет висеть только в процессах

[Muxa]

Именно сервис.

[Admin]

Сообщение от Muxa

Именно сервис.

Лови 10 раз ...

[Muxa]

Попытался скомпилировать, выдает вот это:

Пытался исправить эти ошибки - не получилось

P.S. Windows 7, Delphi 2009

[PhoeniX]

Delphi 7 попробуй - должен работать.
ЗЫ: Привет из Win7

[Admin]

Сообщение от Muxa

Попытался скомпилировать, выдает вот это:

Пытался исправить эти ошибки - не получилось

P.S. Windows 7, Delphi 2009

Варнинги это просто педупреждения, у тебя один эррор, вот его и надо исправить.
А так это все конечно Delphi 2009 по всей видимости глючит, так как в D7 все ОК.

[Muxa]

Пробовал исправить - не получилось( А на Delphi 7 пересаживаться не могу(

[PhoeniX]

Это по какой ж причине (из любопытства)?
Тогда отлавливай ошибку... и ещё кучу ошибок на почве PChar, PANSIChar, string, PWideChar, и им подобным... точнее- ошибки из совместимости...

[Muxa]

Не могу пересесть, т.к. за лицензию СG 2009 начальством деньги плачены. С типами ладно - переживем. А на счет 3 ошибки...

[PhoeniX]

Так это... покажи строчку, на которой спотыкается... ответим...

[lmikle]

Ну компилятор же тебе сказал. у тебя не совпадают типы параметров, которые ты передаешь в какую-то функцию. Внимательно смотри и помни, что по умолчанию String в 2009 - это Unicode (т.е. то, что раньше было WideString).

[Muxa]

Imikle спасибо) Исправил - работает.

[Muxa]

Инсталлирую сервис, а он не отображается в списках служб. В коде идет вроде и инстал и запуск сразу. Может я, я что-то не так делаю?