创建一个自己的服务程序：
File -> New -> Other -> New(选项) -> Service Application 这样delphi会自动生成服务程序的框架。
保存合适的项目名称。(这里单元名为UnitServer.pas, 工程名为ProjectServer.dpr)
在新建的服务里，会发现有DisplayName、Name等属性；
DisplayName: 服务里显示的名称；（服务名: delphi服务演示程序）
Name:服务运行的名称；（服务程序名：DelphiService）
这里要分清楚服务和服务程序两个概念。服务可以启动、停止、删除，自身不能安装和卸载；服务程序则需要安装和卸载；
Net Start 是启动服务程序。
下面为Dos命令下安装服务的exe文件：(Dos下不区分大小写)
Win + R -> cmd -> cd D:delphi(为项目根目录) ->
ProjectServer.exe /install //安装 会提示安装success
net start DelphiService // 启动服务
这里在Win + R -> Services.msc 服务里会看见刚刚启动的服务
服务启动后，程序是不能操作的，要想操作只有停止并卸载
net stop DelphiService //停止服务
ProjectServer.exe /uninstall //卸载
虽然什么代码都没有，但可以创建个空白的服务程序啦。