Delphi编写系统服务五：在系统服务和桌面程序之间共享内存

最新推荐文章于 2022-10-20 11:53:22 发布

Bear_hx

最新推荐文章于 2022-10-20 11:53:22 发布

阅读量1.8k

点赞数

分类专栏： Delphi 编写系统服务总结文章标签： delphi attributes security descriptor initialization constructor

本文链接：https://blog.csdn.net/Bear_hx/article/details/3403937

版权

本文介绍了如何在Delphi中创建系统服务和桌面程序，以使用SECURITY_ATTRIBUTES结构和SECURITY_DESCRIPTOR来实现共享内存。通过设置安全描述符，允许任何用户访问内核对象，并使用CreateFileMapping和OpenFileMapping函数来创建和访问文件映射。在服务端和桌面程序的构造函数中，初始化并创建共享内存，同时在析构函数中释放资源。

摘要由CSDN通过智能技术生成

用于创建内核对象的函数几乎都有一个指向SECURITY_ATTRIBUTES结构的指针作为其参数，在使用CreateFileMapping函数的时候，通常只是为该参数传递NULL，这样就可以创建带有默认安全性的内核对象。
    默认安全性意味着对象的管理小组的任何成员和对象的创建者都拥有对该对象的全部访问权，而其他所有人均无权访问该对象。可以指定一个ECURITY_ATTRIBUTES结构，对它进行初始化，并为该参数传递该结构的地址。
   它包含的与安全性有关的成员实际上只有一个，即lpSecurityDescriptor。当你想要获得对相应的一个内核对象的访问权（而不是创建一个新对象）时，必须设定要对该对象执行什么操作。如果想要访问一个现有的文件映射内核对象，以便读取它的数据，那么调用OpenfileMapping函数：通过将FILE_MAP_READ作为第一个参数传递给OpenFileMapping，指明打算在获得对该文件映象的访问权后读取该文件，   该函数在返回一个有效的句柄值之前，首先
   执行一次安全检查。如果（已登录用户）被允许访问现有的文件映射内核对象，就返回一个有效的句柄。但是，如果被拒绝访问该对象，将返回NULL。

系统服务端核心代码：

constructor TPublicVars.Create(ANew: Boolean);
var
SecMem: SECURITY_ATTRIBUTES;
aSD: SECURITY_DESCRIPTOR;
begin
inherited Create;
{ 创建一个任何用户都可以访问的内核对象访问权 }
InitializeSecurityDescriptor(@aSD, SECURITY_DESCRIPTOR_RE