在delphi中使服務自行安裝

Question

有誰知道如何在Delphi中通過運行exe文件來自行安裝服務應用程序。

Answer 1

使用TService類創建的Delphi服務會生成支持自注冊的可執行文件。這樣稱呼它：

serviceexefilename.exe /install 

當然，你需要提升權限這項工作，就像你對一個安裝服務的任何機制做。

在另一個方向使用/uninstall來反轉該過程。使用/silent來完成註冊過程，很安靜。

如果您想定製安裝過程，您可以提供事件處理程序BeforeInstall,AfterInstall,BeforeUninstall,AfterUninstall。例如，AfterInstall的常見用途是爲您的服務提供說明，因爲基本的TService代碼沒有。