Hier hatte ich mal eine Funktion gepostet, mit der man sich auch von 64 bit Prozessen den Pfad holen kann:
http://www.delphipraxis.net/160046-d...ermitteln.html
Die Umsetzung benutzt je nach Verfügbarkeit und Windows Funktion, die dafür vorgesehenen APIs. Das ganze ist abwärtskompatibel bis Windows 2000.