在delphi中自助安装服务

Question

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

Answer 1

使用TService类创建的Delphi服务会生成支持自行注册的可执行文件。这样称呼：

serviceexefilename.exe /install

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

在另一个方向使用/uninstall来反转该过程。使用/silent进行注册过程，好吧，沉默。

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