Deu certo, era isso Mesmo que eu queria. Obrigado Ricardo Ravelli.
Em 31/07/07, Davi Eduardo Borges Wall <[EMAIL PROTECTED]> escreveu: > > Procure no help do Delphi a função SelectDirectory > > []'s > > De: delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br> [mailto: > delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br>] Em nome de > Ricardo Ravelli > Enviada em: terça-feira, 31 de julho de 2007 13:36 > Para: delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br> > Assunto: Re: [delphi-br] Selecionar pasta no Windows > > Obrigado pela ajuda, mas eu queria aquele que só seleciona a pasta, esse > seleciona o arquivo. > > Ricardo Ravelli > > Em 30/07/07, Alcistemas Informática <[EMAIL > PROTECTED]<alcistemas%40yahoo.com.br><mailto: > alcistemas% <alcistemas%25>40yahoo.com.br> > escreveu: > > > > No delphi 7 uso assim: > > > > inisira um buttom, > > um edit, > > e da Guia Dialog insira o componente opendialog > > > > no on click no buttom que vc adicionou inisira esse código: > > > > opendialog1.Execute; > > edit1.text := opendialog1.FileName; > > > > Espero que ajude. > > > > Abraço! > > > > > > ----- Original Message ----- > > From: Ricardo Ravelli > > To: delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br><mailto: > delphi-br%40yahoogrupos.com.br> <delphi-br%40yahoogrupos.com.br> > > Sent: Monday, July 30, 2007 8:12 PM > > Subject: [delphi-br] Selecionar pasta no Windows > > > > Boa Noite, > > > > Eu estou precisando em um programa que o usuário escolha uma pasta e > > queria > > usar a caixa de selecionar pasta do windows. > > Como eu faço no Delphi? > > > > Delphi 5, MySQL. > > > > Obrigado. > > Ricardo Ravelli. > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > ---------------------------------------------------------- > > > > No virus found in this incoming message. > > Checked by AVG Free Edition. > > Version: 7.5.476 / Virus Database: 269.10.23/924 - Release Date: > 28/7/2007 > > 15:50 > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > [As partes desta mensagem que não continham texto foram removidas] > > > [As partes desta mensagem que não continham texto foram removidas]