ciao ho cercato d'appertutto ma nn ho trovato niente!!!
come si ottiene il nome di una cartella?
ho provato con
DirSelezionata = Dir1.CurDir niente
DirSelezionata = Dir1.Dirname niente

ps non mi serve la path della cartella!
helpmeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee