[Resolvido] Verficar a existencia de nome de arquivo em pasta

[marvazoler 0]

Olá galera beleza?

 

Seguinte:

 

Como eu faço para saber se existe um arquivo em uma pasta via script no Delphi, exemplo:

 

pasta banara

 

um scritp para verificar se tem um arquivo dentro da pasta chamado receita.txt

 

Como eu falço para saber se esse aquivo está dentro da pasta banana?

 

Aguardo!!

[macielcr7 9]

ESSE CODIGO IRA VERIFICAR SE A PASTA c:TESTE

TEM ALGUM ARQUIVO......

 

 

Coloque no FORM 1 BUTTON, E 1 FileListBox

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls, FileCtrl;

type
  TForm1 = class(TForm)

    Button1: TButton;
    FileListBox1: TFileListBox;

    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
begin

  if not DirectoryExists('c:\TESTE') then
     begin
        showmessage('diretorio não existe!!');
     end
  else
     begin

       if FileListBox1.Items.Count <> 0 then
          showmessage('existe arquivos !!')
       else
          showmessage('não existe arquivos!!');
     end;


end;

end.

TEM ESSE AQUI MAIS SIMPLES.....

COLOQUE ISSO EM UM BUTTON....

if FileExists('c:\teste\teste.txt') then
  begin
    showmessage('existe!!');
    end
    else
    showmessage('não existe!! O ARQUIVO TESTE.TXT');
end;

http://forum.imasters.com.br/public/style_emoticons/default/clap.gif

[marvazoler 0]

Obrigado amigão funcionou legal!!

[marvazoler 0]

Amigão, surgiu outro troço aqui,

olha:

 

Tenho um arquivo de nome grande e misturado, tem como verificar

 

no nome do aquivo a existencia de um nome?

 

Por exemplo

 

joao_maria_000001_paulo.txt

 

Tem como achar no nome do arquivo o 000001?

 

Desde já agadeço

[macielcr7 9]

Não entendie... explica melhor por favor.!'

 

Amigão, surgiu outro troço aqui,

olha:

 

Tenho um arquivo de nome grande e misturado, tem como verificar

 

no nome do aquivo a existencia de um nome?

 

Por exemplo

 

joao_maria_000001_paulo.txt

 

Tem como achar no nome do arquivo o 000001?

 

Desde já agadeço

 

[marvazoler 0]

Olha só:

 

tenho vários arquivos em um pasta e eles tem nomes misturados

 

 

exemplo:

joao_maria_000001_paulo.txt

 

marcos_ricardo_000011_paulo.txt

 

liliane_beto_000050_paulo.txt

 

e por ai vai

 

eu gostaria de pegar os uma seguencia de valores por exemplo, 000050, verificar a existencia deste numero no nome do arquivo, entendeu?

 

Obrigado pela atenção!!

[macielcr7 9]

procure artigos ....

 

com assunto auto complementar

[marvazoler 0]

Amigão acho que você não entendeu!

 

tenho vários arquivos dentro de uma pasta, certo!!

 

cada arquivo tem um nome,

 

cada arquivo tem o seu nome misturado da seguinte ideia!

 

10-4000-800-00001-blabal.txt

 

é misturado mesmo, mas tem um valor que muda em um determinada parte do nome do aquivo, no caso acima

 

10-4000-800-00001-blabal.txt

 

pode mudar para outro numero que é: 00001, que pode ter outos arquivos 00010 ou, 00040 é essa parte do nome do

 

arquivo que muda, por isso é que eu quero verificar qual valor que está presente no arquivo, entede!!

 

É só verificar mesmo!!

 

Abraços

[macielcr7 9]

Dá uma olhada Nesse LINK site de diretorios DELPHI

 

você VAI PODER LISTAR TODOS OS ARQUIVOS DE UM DIRETORIO ESPECIFICO....