Fórum Navegar no ShellTreeView #396708
04/03/2011
0
Obrigado.
Marcos Costa
Curtir tópico
+ 0Posts
05/03/2011
Marcos Costa
Gostei + 0
11/03/2011
Rodrigo Mattos
procedure TForm1.Button1Click(Sender: TObject); var I: Integer; St: String; begin for I := 0 to ShellListView1.Items.Count -1 do begin St := ShellListView1.Folders[I].DisplayName; if St = 'Meu computador' then begin ShellListView1.ItemIndex := I; Break; end; end; end;
Espero ter Ajudado.
http://mundodoprogramador.wordpress.com
Gostei + 0
12/03/2011
Marcos Costa
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)