本文主要是介绍Delphi安装NT服务程序时,不出现提示信息,希望对大家解决编程问题提供一定的参考价值,需要的开发者们随着小编来一起学习吧!
如果我们不加上"/silent",那么Delphi在安装和卸载NT服务程序时候,都会出现一个提示信息,不希望出现这个提示信息,那么使用如下命令:
1,安装:“你的nt程序 /install /silent”。
2,卸载:“你的nt程序 /uninstall /silent”。
这是Delphi中注册服务方法声明,Silent是决定是否提示的参数:
procedure TServiceApplication.RegisterServices(Install, Silent: Boolean);
下面是具体出现提示的代码:
if Success and not Silent then
if Install then
DisplayMessage(SServiceInstallOK, mtInformation)
else
DisplayMessage(SServiceUninstallOK, mtInformation);
看到这些,我想大家就知道为什么不加那个"/silent"参数会出现提示了!
这篇关于Delphi安装NT服务程序时,不出现提示信息的文章就介绍到这儿,希望我们推荐的文章对编程师们有所帮助!