Einzelnen Beitrag anzeigen

marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#8

Re: SetEnvironmentVariable global?

  Alt 14. Feb 2007, 07:18
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
  Mit Zitat antworten Zitat