zugriff auf die system-variable "path"??????

[ake]

hallo, <br> <br> <br>
ich sollte zugriff auf die system-variable "path" haben. <br>
d. h. einlesen, verändern und wieder zurückschreiben. <br> <br>

weiss jemand wie ich das bewerkstelligen kann??? <br>
dies sollte unter winnt geschehen. <br>
vielen dank im vorraus. <br>
ake <br>

[Heiko Bayer]

hallo ake,<br>
<br>
hier ein beispiel für das hinzufügen des verzeichnisses 'DummyDir' zur pfadvariablen.<br>
durch das senden des broadcast, werden alle toplevel-applikationen über die veränderung informiert.<br>
<br>
void __fastcall TForm1::Button1Click(TObject *Sender)<br>
{<br>
TRegistry *registry;<br>
AnsiString key;<br>
AnsiString myDir;<br>
AnsiString newPath;<br>
AnsiString oldPath;<br>
AnsiString section;<br>
<br>
myDir = "C:\\DummyDir";<br>
key = "SYSTEM\\CurrentControlSet\\Control\\Session Manager\\Environment";<br>
registry = new TRegistry();<br>
registry->RootKey = HKEY_LOCAL_MACHINE;<br>
if(registry->KeyExists(key)) {<br>
registry->OpenKey(key, false);<br>
if(registry->ValueExists("Path")) {<br>
oldPath = registry->ReadString("Path");<br>
newPath = oldPath + ";" + myDir;<br>
registry->WriteString("Path", newPath);<br>
section = "Environment";<br>
::SendMessage(HWND_BROADCAST, WM_WININICHANGE, 0, (LPARAM)section.c_str());<br>
}<br>
registry->CloseKey();<br>
}<br>
delete registry;<br>
}<br>
<br>
gruss, heiko<br&gt

[MichaelK]

Danke<br>
Gruß Michae