Die
Zitat:
Ein besonderes Problem dabei sind "OpenWithList" und "OpenWithProgIds" ...
würde ich ignorieren, dort sind mehrere Auswahlmöglichkeiten für Programme angegeben, aber keine direkten Verknüpfungen, um z. B. eine Datei per Doppelklick sofort mit einem Programm zu öffnen.
Wenn ich das bei meinem XP in der Registry richtig sehe, verweisen die Einträge in den OpenWith... aber wieder auf Einträge unter HKEY_CLASSES_ROOT. Du solltest von daher dort keine neuen bzw. unter HKEY_CLASSES_ROOT nicht zu findende Verknüpfungen entdecken.
Das Auslesen von
HKEY_CURRENT_USER, im Zweig "Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts"
sollte in etwa so funktionieren:
Delphi-Quellcode:
reg.rootkey := HKEY_CLASSES_ROOT;
if reg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts', False) then
...
Eigentlich musst Du die Logik, die Du schon implementiert hast nur geringfügig anpassen.