Fórum Help Busca diretorio #270741
02/03/2005
0
tenho um botão (bitBtn) mesmo e quero fazer com que ao clicar seja exibida arvore de diretorios do meu sistema para que eu possa selecionar um diretorio qualquer...
Depois de selecionado eu possa joga-lo (o endereço pesquisado) em um edit para jogalo em uma variável!!!
Será que alguem quebra essa pra mim, ou melhor caso ixu naum seja possivel com estes como fazer!!! desde jah meu muito obrigado a todos!!!
abraços.
Klaveren
Curtir tópico
+ 0Posts
02/03/2005
Oscar Candido
espero que ajude
Um abraço
Gostei + 0
02/03/2005
Oscar Candido
Gostei + 0
02/03/2005
Klaveren
tks!
Gostei + 0
02/03/2005
Oscar Candido
procedure TForm1.Button1Click(Sender: TObject); begin Edit1.Text := ShellTreeView1.Path; end;
Gostei + 0
03/03/2005
Klaveren
utilizando o componente ´ DirectoryListBox´ da guia win3.1 ele lista apenas a arvore de diretorios unidade de disco em que o rprograma esta executandu, sei que tem o componente ´DriveComboBox´ porem me falta conhecimento para fazer com que o ´ DirectoryListBox´ entenda qual unidade de disco deverá acessar de acordo com minha especificação!!!
Se alguem conseguir me dar um HELP ficarei agradecido!!!
[b:7d85da0214]Boa Noite a Todos!!!![/b:7d85da0214]
Gostei + 0
03/03/2005
Oscar Candido
Espero ter ajudado
Um Abraço
Gostei + 0
04/03/2005
Rômulo Barros
Uses FileCtrl; ... procedure TForm1.Button1Click(Sender: TObject); Var DirSelecionado : String; begin If(SelectDirectory(´Meu Caption´,´Selecion um diretório abaixo´,DirSelecionado))Then ShowMessage(´O diretório selecionado foi: ´ + DirSelecionado); end; end.
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)