Adres ze znakiem '~' do 'normalneg'

Czy majac adres ze znakiem '' da sie go przerobic do takiego zeby go ladnie wyswietlic? :-) Np. zamiat 'C:\DOCUME1' zeby wyswietlilo sie 'C:\Documents and Settings' :d Adres ten pobieram z funkcji ExpandEnvironmentStrings. A nie chce uzytkownikowy wyswietlac 'zatyldzialego' :p tekstu tylko taki FULL WYPAS :-) Jak to zrobic?

function ExpandFileName(const FileName: string): string;

a z powrotem do 'zatyldziałego':

function ExtractShortPathName(const FileName: string): string;