Wie kann ich eine Umgebungsvariable ändern und andere Apps den Wert anzeigen lassen, ohne mich abzumelden?

Question

Ich benutze Delphi 10 Seattle auf einer Windows7 64bit Maschine. Hier

ist das Problem:

Um eine Testumgebung für meine Software zu schaffen, habe ich eine kleine Anwendung, die Umgebungsvariablen in der Windows-Registrierung fügt unter

HKEY_CURRENT_USER\Environment 

Ich benutze diese Variablen in die Suchpfade meiner Pakete und des Hauptprojekts, um auch Projekteinstellungen in die Quellcodeverwaltung übernehmen zu können und einfach von Produktion zu Testzweigen usw. zu wechseln ...

Jetzt ist das Problem, dass nach cre Bei der Umgebungsvariable aktualisiert Delphi seinen "internen Systemvariablenspeicher" unter

nicht und das Projekt wird nicht kompiliert.

Selbst der Neustart von Delphi brachte nicht den gewünschten Effekt. Ich musste Windows komplett neu starten, damit es funktioniert.

Gibt es eine Möglichkeit, die Systemvariablen in Delphi innerhalb meiner Anwendung zu aktualisieren? Fehle ich etwas anderes?

Vielen Dank!

Answer 1

Ich mache etwas ähnliches in meinem Path Compressor in this blog post beschrieben. Die relevante Methode ist diese:

procedure TPathCompressor.NotifyChanges; 
{ Sending a WM_SETTINGCHANGE message to all top level windows. Otherwise the new environment variables 
    will only be visible after logoff/logon. } 
begin 
    {$IFDEF DEBUG} 
    Exit; 
    {$ENDIF} 
    SendMessageTimeout(HWND_BROADCAST, WM_SETTINGCHANGE, 0, NativeInt(PChar('Environment')), SMTO_ABORTIFHUNG, 5000, nil); 
end;