Aндрей, так вы задайте для ShellTreeView атрибут ObjectTypes, чтобы отображались и файлы тоже...
Код:
procedure TForm1.FormCreate(Sender: TObject);
begin
ShellTreeView1.ObjectTypes := [otFolders, otNonFolders];
end;
Или то же в Объектном Инспекторе.