En
este hilo hay una respuesta de Dec, donde tienes el código de una Unit para obtener todos los "directorios especiales" del sistema.
Se trata de llamar al procedimiento con las diferentes constantes (segun el directorio que quieras obtener).
Si quieres más información busca por:
SHGetSpecialFolderPath