如何使用德尔福创建系统服务程序

1）您无需登录系统即可运行。

2）具有系统权限。因此，您不能在进程管理器中结束它。

2003年，我在为一家公司开发机顶盒项目时，曾经写过关于课件上传和服务的文章，下面是如何用delphi7创建一个服务程序的。

运行 delphi7 并选择菜单文件-->new-->other---service 应用程序生成服务程序的框架。 将项目另存为 和 单位，然后返回到主框架。

我们注意到服务有几个属性。 以下是我们比较常用的一些方法：

1） DisplayName：服务的显示名称。

2） 名称：服务的名称。

这里我们将 displayname 的值更改为："德尔福服务演示程序"，名称设置为"delphiservice".编译这个项目，你会得到 这已经是一个服务程序了！ 进入cmd模式，切换到项目所在目录，执行命令" /install"，服务安装就会成功！

然后"net start delphiservice"这项服务将启动。 进入控制面板->管理工具->服务，将显示服务和当前状态。 但是这个服务现在什么都做不了，因为我们还没有写**：

第一"net stop delphiservice"再次停止" /uninstall"删除此服务。 回到 delphi7 的 ide。

我们的计划是给这个服务添加一个主窗口，运行后任务栏会显示程序的图标，双击图标会显示主窗口，上面有一个按钮，点击按钮会实现ctrl+alt+del功能。

实际上，服务程序认为它不适用于 Winlogon 桌面，您可以打开控制面板并查看我们刚刚拥有的服务的属性 - >登录，其中"允许服务与桌面交互"它没有打勾。 该怎么办？ 呵呵，回到 IDE 并注意那个 Boolean 属性：

交互，当此属性为 true 时，服务程序可以与桌面交互。

这取决于实现的功能。

有教程。 我建议你看看它。

菜单文件 --new --others --service 创建一个服务程序模板。

Windows NT服务程序不同于一般的运行程序，它不需要NT登录，只需要启动进入NT系统即可运行，一般用于系统服务的应用中，学习编写NT服务程序对于网络管理人员来说非常重要，德尔菲作为一门高效、快速、强大的开发语言， 提供了一种非常方便的开发NT服务程序的方式，加上它的可视化界面和与数据库的完美结合，为了让我们开发与数据库相关的NT服务程序变得非常简单，下面举例说明编写一个NT定期备份程序，以及如何使用Delphi编写Windows NT服务程序。

打开 delphi 并选择 file|新建，在新建项中选择服务应用项，Delphi 会自动为你创建一个基于 TserviceApplication 的新项目，tserviceApplication 是一个封印网络服务程序的类，它包含一个 TService1 对象以及服务程序的加载和卸载、注册和取消方法。

对 tservice1 对象的属性进行以下更改：

如果将“DisplayName”和“Name”更改为“Databackup”，并将“ServiceStartName”属性更改为“系统管理员用户”（如“域管理员”）和“密码”，请输入用户密码。

这样，服务器运行时将欺骗自己，以该用户的权限操作 nt。

这样，一个NT服务程序的编写就完成了，在delphi机器中选择了run|菜单参数，在参数中输入install，程序编译运行后，已经安装了一个名为databackup的NT服务程序，可以在控制面板中双击该服务项目，你会看到这个服务程序，但是这个服务程序与此无关; 在 delphi 设备中，选择菜单 run|参数，在参数字段输入卸载，程序编译运行后系统将卸载服务程序。