Forzar ShellTreeView
 

Resulta que tengo un form con un ShellTreeView, en el cual limito su contenido a unidesdes removibles y CD/DVD, de la siguiente forma:

Código Delphi [-]
 
procedure TMain.ShellTreeView1AddFolder(Sender: TObject;
  AFolder: TShellFolder; var CanAdd: Boolean);
begin
 CanAdd := GetDriveType(PChar(Copy(AFolder.PathName, 1, 2))) in [DRIVE_REMOVABLE, DRIVE_CDROM];
end;

Esto marcha perfecto, el problema está en que, si yo inserto un PenDrive, el ShellTreeView no actualiza las unidades, por lo que no la muestra. La unica forma de que la muestre es saliendo y entrando nuevamente de la aplicación.
Veo que el ShellTreeView tiene una propiedad AutoRefresh, no se si tenga algo que ver, pero de todas maneras esta en True.
Como puedo hacer que refresque las unidades, para que detecte si he conectado un PenDrive o lo he quitado.

Sugerencias, e ideas seran bienvenidas.

Saludos y Muchas Gracias.