Si, cuando da clic en el botón, aparece una pantalla donde escoge el usuario donde guardar su carpeta, utilizo
SelectDirectory
Te comparto esa parte de mi código
Código Delphi
[-]procedure TForm2.ChangeClick(Sender: TObject);
begin
Choose := 'C:\';
if selectdirectory(Choose, options, 0) then
begin
ShowMessage('Directory selected');
Form2.LLabelDirectory.Caption :=Choose;
end
else
begin
ShowMessage('Canceled action');
end;
end;