历史
我建立一个Windows Service作为我的一部分Platform Application来处理更新和服务器的功能,因此它可以被安装在机器比在不同的Client Application安装.它使用UDP发送和接收广播消息,并使用TCP来处理更敏感和最重要的消息.
目的
我希望最终用户可以轻松安装我的应用程序,只需复制计算机中的可执行文件并执行它们即可.主应用程序应验证用户是否为管理员,创建配置文件,然后安装Windows服务并运行它,因此当非管理用户登录时,他们不会从我的应用程序收到有关管理权限的任何错误.目标是在不需要现有技术人员的情况下进行大多数配置,因为数据库将是远程的.
问题
我的服务正在使用命令正常安装,MyService.exe /install但它没有自动启动.启动它的唯一方法是继续Control Panel > Admin Tools > Services手动操作.我尝试net start MyService通过我的应用程序调用,但我收到invalid service name了shell.我tryied了executable name,该display name和object name服务,但没有一次成功.这是我的TService的目标:
object ServiceMainController: TServiceMainController
OldCreateOrder = False
OnCreate = ServiceCreate
DisplayName = 'PlatformUpdateService'
Interactive = True
AfterInstall = ServiceAfterInstall
AfterUninstall = ServiceAfterUninstall
OnShutdown = ServiceShutdown
OnStart = ServiceStart
OnStop = ServiceStop
Height = 210
Width = …Run Code Online (Sandbox Code Playgroud)