EnableExplicit Define lpszLongPath$ Define lpszShortPath$ = Space(#MAX_PATH) lpszLongPath$ = "C:\Dokumente und Einstellungen\" GetShortPathName_(@lpszLongPath$, @lpszShortPath$, #MAX_PATH) Debug lpszShortPath$