Delphi - 使用Form在应用程序内安装,启动,停止服务

Question

我有Delphi应用程序,我添加了服务,我如何通过主窗体按钮安装和启动和停止它？

我可以在单独的项目服务中完成它,但我的目标是使服务接口控制它.

谢谢

Answer 1

你必须使用Win32 API服务控制功能- ,CreateService(),OpenService(), StartService(),ControlService()等服务在运行时无法显示自己的用户界面,用户界面需要运行一个单独的进程.但是,如果需要,可以使用相同的可执行文件托管服务代码和UI代码,使用命令行参数知道何时作为服务运行以及何时作为UI运行.但这更像是一个代码管理问题.您可以轻松地将两个代码库托管在单独的可执行文件中.