delphi编写服务程序问题

以前总认为编写个服务程序挺简单,可是今天去弄了一下,一头雾水.可能是昨天吃了感冒药的缘故.好困,思路也迷糊.只能弄一点算一点了.

首先需要建立一个基于服务的项目.然后控制属性.最后完成.迷惑的是我的服务启动挺快,停止咋就那么慢呢?