Vollen Dateinamen aus 8.3-Format ermitteln

[Jasocul]

Hallo,

ich habe folgende Situation:
Meine Anwendung ist in das Kontext-Menü des Windows-Explorers (Windows 7) eingebunden.
Es bekommt über den ersten Parameter einen Dateinamen geliefert.

In der Anwendung landet dann der Dateiname im verkürzten 8.3-Format. Auch die enthaltenen Pfade sind derart verkürzt.
Aus HalloWindows7.txt wird HALLOW~1.TXT.

Für die weitere Verarbeitung benötige ich aber die korrekten Pfad- und Datei-Angaben.

Mal abgesehen davon, dass ich nicht verstehe, warum ich den Namen so vom Betriebssystem geliefert bekomme, suche ich eine Funktion, die mir die richtigen Angaben liefert.

Ein wenig Source:

Delphi-Quellcode:

var
  Filename : String;
begin
...
  Filename := ParamStr(1);
  ShowMessage(Filename); // Zeigt nur verkürztes 8.3-Format
...
end;