Como fazer pra procurar um determinado arquivo ?

Delphi

29/07/2004

Olá a Todos,

não me lembro mais como fazer para procura um arquivo em um diretório especificado pelo usuário.

Se alguém souber e quizer me dá uma ajudinha...

Eu quero fazer o seguinte, o usuario informa o nome ou extensão (*.xx) do arquivo e tb o diretório a ser procurado.


Aguardando...


Christian.


Christian_adriano

Christian_adriano

Curtidas 0

Respostas

Rômulo Barros

Rômulo Barros

29/07/2004

procedure TForm1.Button1Click(Sender: TObject);
Var
   strDiretorio : String;
begin
// Uses FileCtrl
   If(SelectDirectory(´Escolha um Diretório :´,´´,strDiretorio))Then
   Begin
      If(FileExists(strDiretorio + ´\´ + Edit1.Text))Then
         ShowMessage(´Arquivo Localizado: Path = ´ + strDiretorio + ´\´ + Edit1.Text);
   End;
end;

end.



GOSTEI 0
Christian_adriano

Christian_adriano

29/07/2004

Olá Amigo ´Undeclared Identifier´,

o q eu quero fazer eh o seguinte:

Quero um busca tipo a do Windows, tipo :

Informo aonde eu quero q ele busque (Ex. C:),
e o nome ou exetensão do arquivo a ser procurado.

depois disso ele percorre toda a unidade (Pastas e Subpasta) a procura do arquivo ou extensão desejada.

É isso q desejo saber.....

mais Agradeço atenção !!!!


Christian.


GOSTEI 0
POSTAR