To check, if the folder has been successfully selected, you can use code like this:
try ShellTree.SelectedFolder := aPath; except ShowMessage('Not Found: ' + aPath); end;