Ich habs nicht getestet, vielleicht gibt Dir
ExpandFileName den Namen in schön wieder?
Oder ExtractFilePath ?
Oder
System.IOUtils.TPath.GetDirectoryName ?
Reines
WinApi würde ich SHGetFileInfo eventuell mit PIDL verwenden, das sollte Dich auch ans Ziel bringen.