Tenho um projecto em Delphi 2010 que quando clico em um botão abre um directório, este é o código: 

    DirFolder := 'C:\teste';
    ShellExecute(Handle, 'open', PChar(DirFolder), nil, nil, SW_SHOWNORMAL);

Abre isto:

[![inserir a descrição da imagem aqui][1]][1]

Deixo a questão, é possível quando fechar o projecto também fechar essa pasta?


  [1]: https://i.sstatic.net/hMfEH.png