Ermitteln des Programme-Verzeichnis

[Stefan Kraus]

Wie kann ich aus Delphi das Programme-Verzeichnis ermitteln ähnlich der Funktion GetWindowsDir für das Windows-verzeichnis. Das Programme-Verzeichnis hat in jeder Sprache einen anderen Namen, das ist mein Problem.

[Frank Kneffel]

In der registry steht unter HKEY_LOCAL_MACHINE\SOFTWARE\MICROSOFT\WINDOWS\Curr entVersion der Eintrag ProgrammfilesDir. Dieser enthält das Programme Verzeichni

[Markus Fuchs]

Hi,<p>
versuch mal folgendes:<p>
<tt>
var<br>
p : pitemidlist;<br>
pc : pchar;<br>
begin<br>
SHGetSpecialFolderLocation (Form1.handle, CSIDL_PROGRAMS, p);<br>
new (pc);<br>
getmem (pc, 255);<br>
SHGetPathFromIDList (p, pc);<br>
end;<p>
</tt>
pc sollte nun 'C:\Programme\' zugewiesen sein.<p>
Ich hab' das zwar noch nie selbst ausprobiert, sollte aber funktionieren.<p>
Gruß,<br>
Marku