SetEnvironmentVariable global?

[FriFra]

Gibt es eine Möglichkeit eine globale Systemvariable zu setzen?
SetEnvironmentVariable funktioniert ja leider nur für den aktuellen Prozess und ist daher für mich unbrauchbar.

[marabu]

Hallo,

wahrscheinlich gibt es eine "bessere" Lösung für dein Problem, aber weil du deinen Lösungsansatz bereits gewählt hast und ich dein Problem nicht erkenne: klick

Freundliche Grüße

[Christian Seehase]

Moin FriFra,

könntest Du bitte mal ein wenig präzisieren, wie die Zusammenhänge zwischen den beteiligten Prozessen sind.
Der Weg über HWND_BROADCAST und WM_WININICHANGE wie er auf der von marabu verlinkten Site gezeigt wird funktioniert nur dann, wenn die Anwendung, die die Message erhält, diese auch verarbeitet, was, IMHO, kaum eine tut.

[marabu]

Hallo Chris,

nur Programme, die das auch wirklich wollen, werten zur Laufzeit die Nachricht WM_SETTINGCHANGE (!) aus. Ich habe lange überlegt, wozu der OP das brauchen könnte. Als IPC Ersatzlösung lässt sich der Ansatz nicht wirklich positionieren. Was bleibt dann noch? Ein Utility, welches den windows-eigenen Dialog für Umgebungsvariablen nachbildet? Eher auch nicht. Vermutlich ist die Idee das Aufsetzen einer globalen Variable, damit ein später gestartetes Programm diese im eigenen environment block findet und auswerten kann. Dazu ist der Klimmzug nicht nötig, da man statt ShellExecute() auch CreateProcess() einsetzen und dort das Environment massgeschneidert bereit stellen könnte. Bin auch gespannt auf die Antwort auf deine Frage.

Freundliche Grüße

[arbu man]

Ein ähnliches Problem hat ich auch mal: http://www.delphipraxis.net/internal...t.php?t=101833

Vielleicht hilft es dir, mfg, Björn

[Christian Seehase]

Moin Marabu,

ich habe da eher den Verdacht, dass es darum geht, das ein in der Konsole gestartetes Programm eine Umgebungsvariable setzten soll, die dann, nach dessen Ende, verarbeitet wird.
Aber lassen wir uns mal überraschen.

[FriFra]

Ja, so ungefähr ... Ein Programm soll eine Umgebungsvariable setzen und diese soll dann für alle nachfolgend gestarteten Anwendungen auslesbar sein. Für irgendwelche Klimmzüge mit der Registry habe ich keine Möglichkeit, da diese Variable von einem Account mit eingeschränkten Rechten gesetzt werden soll.

[marabu]

Guten Morgen,

Zitat von FriFra:

... Ein Programm soll eine Umgebungsvariable setzen und diese soll dann für alle nachfolgend gestarteten Anwendungen auslesbar sein. ...

der Standardweg unter Windows wäre dann das aufsetzen eines speziellen Environment:

Delphi-Quellcode:

procedure TDemoForm.FormCreate(Sender: TObject);
var
  cmd, shell: string;
begin
  SetEnvironmentVariable('DPTEST', 'FRIFRA');
  shell := GetEnvironmentVariable('COMSPEC');
  cmd := '/K SET DPTEST';
  ShellExecute(0, '', PAnsiChar(shell), PAnsiChar(cmd), '', SW_SHOW);
  Release;
end;

Alle Programme, die jetzt gestartet werden, finden die Variable DPTEST.

Freundliche Grüße