[Snake22]

хм вроде все правильно написано.
а если пошагово выполнять может где недочёт какой выясниться?
А вот chosendirectory чему равен? случайно не ExtractFilePath(...) ? а то тогда после него эта часть + '\' не нужна