在Delphi中设置COM服务器启动权限

Question

我有一个COM服务器，我需要检查其启动权限，并可选择将IUSER从Delphi代码添加到访问列表中。 COM启动权限记录在此处：

http://msdn.microsoft.com/en-us/library/windows/desktop/ms687202(v=vs.85).aspx

如何从代码中读取或修改LaunchPermission？

谢谢，

/ A