Код:
a:=LabeledEdit1.Text; // вводим название папки
RenameFile('done/default', a); // изменяем название папки в директории на то, которые мы написали в LabeledEdit1.Text
Написал вот так, но переименованная папка появляется в корне директории программы