从Delphi（Win32）设置环境变量

我试图在我的delphi应用程序中设置一个系统范围的环境变量。文档中说向HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Environment添加注册表项，然后广播WM_SETTINGCHANGE消息。有人知道如何广播这条消息吗

另外，我正试图在控制台应用程序中执行此操作。

调用。使用

HWnd\u广播

作为目标窗口

---

更好的选择可能是，不等待所有收件人返回。

Embarcadero开发者网络中也有一个主题，介绍了这个问题，并提供了发送邮件的示例代码。作者按照MSDN文档中的建议使用：

---

我使用了链接文章中的代码。我发现在环境中使用Reg.WriteString设置路径是错误的，它应该使用Reg.WriteExpandString