在delphi中自助安装服务

Mar*_*rko 17 delphi service

有没有人知道如何在Delphi中通过运行exe文件自行安装服务应用程序.

Dav*_*nan 25

使用TService该类创建的Delphi服务会生成支持自行注册的可执行文件.像这样称呼它:

serviceexefilename.exe /install
Run Code Online (Sandbox Code Playgroud)

当然,您需要提升权限才能正常工作,就像安装服务的任何机制一样.

在另一个方向用于/uninstall反转过程.使用/silent使登记过程中,好了,沉默不语.

如果您希望自定义安装过程中,您可以提供事件处理程序BeforeInstall,AfterInstall,BeforeUninstall,AfterUninstall.例如,常见的用途AfterInstall是为您的服务提供描述,因为基本TService代码没有.