Forum: Win32/Win64 API (native code)
Delphi
by mleyen,
24. Feb 2011
Auf die nicht existierende aDest-Datei würd ich es jetzt auch nicht anwenden.
Ansonsten kann man afaik immer den langen Dateinamen wieder rausbekommen.
Aber der '\\?\'-Trick scheint ja die offizielle-ordentliche Variante zu sein.
Forum: Win32/Win64 API (native code)
Delphi
by mleyen,
24. Feb 2011
Hilft evtl
function LongFileNameToShortFileName(const LongFileName: string): string; inline;
begin
Result := '';
SetLength(Result, GetShortPathName(PAnsiChar(LongFileName), nil, 0));
if Length(Result) > 0 then
begin
GetShortPathName(PAnsiChar(LongFileName), PAnsiChar(Result), Length(Result));
SetLength(Result, Length(Result)-1);
end;