delphi - 如何使用 Delphi 更改服务的权限？

Question

我已经编写了一个 Windows 服务，我希望通过删除管理员启动/停止它的权利来防止管理员随意篡改它。

当然，管理员可以提升到 SYSTEM 权限并做任何他们想做的事情，甚至管理员仍然可以暂停服务的线程或删除服务，但这是为了防止随意篡改.

我可以使用 Process Explorer 很容易地做到这一点(见下文)，但我不确定从哪里开始使用 Delphi。我浏览了 SetAcl C++ source code (我可能会使用他们的 OCX 文件)，但如果已经存在，我更愿意使用本地 Delphi 解决方案。如果没有，我将致力于克隆 SetAcl 功能。

有没有人可以分享这方面的经验？

注意:我在这篇文章中提倡使用 Delphi 编写的屏幕捕获工具，我将删除它，因为它是不相关的。我把这张便条留在这里，这样评论仍然有意义!问候。

Answer 1

管理员有权在他们的计算机上做任何他们想做的事。您是否正在寻求一种方法来更改管理员权限在计算机上的工作方式？

任何阻止管理员“篡改”其控制下的东西的软件听起来都像是 rootkit 或其他一些恶意软件。如果管理员想要关闭您的服务，您应该提供自己的快速工具来关闭它，并且您不应该(并且可能不能)阻止他们这样做，无论是从 Windows GUI 还是从 SC.EXE 或 NET STOP在命令行上。

话虽这么说，如果它是一个 Windows API，您想要一个 Delphi 包装器，我会找到 API 的名称并在 JEDI API 库中搜索它。看起来像 JWSCL会工作。