Кто-нибудь знает, как сделать сервисное приложение в Delphi, которое устанавливает его самостоятельно, запустив exe файл.
Сделать сервис самостоятельно установленным в delphi
Ответ 1
Служба Delphi, созданная с использованием класса TService
, приводит к выполнению исполняемого файла, который поддерживает самостоятельную регистрацию. Назовите это так:
serviceexefilename.exe /install
Естественно, вам нужны повышенные права на это, как и для любого механизма, который устанавливает службу.
В другом направлении используйте /uninstall
, чтобы отменить процесс. Используйте /silent
, чтобы сделать процесс регистрации, ну, тихий.
Если вы хотите настроить процесс установки, вы можете предоставить обработчики событий BeforeInstall
, AfterInstall
, BeforeUninstall
, AfterUninstall
. Например, общее использование AfterInstall
заключается в предоставлении описания для вашей службы, поскольку базовый TService
код не работает.