Set environment variables from Delphi (Win32)

Question

I'm trying to set a system wide environment variable from within my delphi application. The Documentation says to add a registry key to HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Environment and then broadcast a WM_SETTINGCHANGE message. Anyone know how to Broadcast this message?

PS. I'm trying to do this in a console application.

Answer 1

Call SendMessage. Use HWnd_Broadcast as the target window.

A better option may be SendNotifyMessage, which doesn't wait for all the recipients to return.

Answer 2

There is also a topic in the Embarcadero Developer Network covering this issue and providing sample code for sending the message. The author uses SendMessageTimeout as recommended in the MSDN doc for WM_SETTINGCHANGE:

http://edn.embarcadero.com/article/28254