Konverter lange filnavn til 8,3 format.Contributor: ANDRE V.D Merwe > Har noen hatt noe hell gjør GetShortPathName > å jobbe? Det er ment å konvertere en lang fil /sti > navnet til en DOS 8.3 struktur ... men det holder tilbake > den samme lange filnavn jeg passerer deretter inn dette, det fungerte for meg .... funksjon ToShortPath (Späth: string): string; Var Ilen: integer; sShort: string; szShort: PChar; begynne Ilen: = Lengde (Späth); szShort: = StrAlloc (Ilen); GetShortPathName (PChar (Späth), szShort, Ilen); sShort: = szShort; StrDispose (szShort); Resultat: = sShort; ende;