用Delphi编写Windows服务程序(2)

======================================================
注：本文源代码点此下载
======================================================

windows的服务是一个比较实用的功能,你的程序可以在windows未进行登录的时候就开始运行,不受用户注销的影响,也不容易被用户误关闭。

但是编写服务也许不是一件容易的事情,幸好delphi给我们提供了一个模板,可以很容易的编写一个标准的windows服务程序。

首先,在delphi内新建一个service application。

此时,delphi已经给我们建好了一个service程序的框架,我们只需要把我们的代码加到合适的位置就行了。

一般情况下,service内需要一个线程来不断的工作,也许定时器也可以,但线程工作起来更好。

delphi会生成一个可视化的service容器,你可以一些必要的控件在它上面,但是由于它是服务程序,是没有界面显示的,因此不建议在上面安放edit之类的控件,服务只是应该做处理工作的,显示界面应该由其它的程序来完成。service控件的displayname属性是显示在管理工具-》服务的左边的名称的内容,而name属性则是服务名称,当你用命令提示符来启动、停止服务时,就需要用到。

在事件onstart内,我们应该完成启动线程的工作。

如:

======================================================
在最后，我邀请大家参加新浪APP，就是新浪免费送大家的一个空间，支持PHP+MySql，免费二级域名，免费域名绑定 这个是我邀请的地址，您通过这个链接注册即为我的好友，并获赠云豆500个，价值5元哦！短网址是http://t.cn/SXOiLh我创建的小站每天访客已经达到2000+了，每天挂广告赚50+元哦，呵呵，饭钱不愁了，\(^o^)/