Foros Club Delphi - Indentificar Carpeta o Archivo

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- API de Windows (https://www.clubdelphi.com/foros/forumdisplay.php?f=7)

- - Indentificar Carpeta o Archivo (https://www.clubdelphi.com/foros/showthread.php?t=12277)

Waldo

12-07-2004 01:24:44

Indentificar Carpeta o Archivo

Hola A TODOS.

Necesito identificar cuando el findfirts encuentra una carpeta o un archivo, espero alguien me pueda clarar esta duda, saludos

Ruben_Cu

12-07-2004 04:42:52

Hola Waldo, prueba colocar en el evento OnClick de un botón este procedimiento:

Código PHP:


		
			
procedure TForm1.Button1Click(Sender: TObject);

var archivo:TSearchRec;

begin

        if FindFirst(Edit1.Text,0, archivo)=0 then

                showmessage('Encontre el archivo '+archivo.Name)

                else showmessage('No encontre el archivo '+Edit1.Text);

                findclose(archivo);

end;

En el edit1 colocas el path incluyendo el nombre del file.
La función devuelve cero cuando encuentra la primera coincidencia con las características del file dado.
Te recomiendo revises la ayuda de delphi para mas informacion de sobre la función.
Saludos

Waldo

12-07-2004 05:49:16

Si eso si lo se.

Pero mi objetivo es identificar si es archivo o carpeta cuando el findfirs lo busca en el phath.

delphi.com.ar

12-07-2004 15:41:02

El "campo" type Attr del record type TSearchRec te indica del tipo de archivo que se trata.

Saludos!

Ruben_Cu

12-07-2004 19:43:18

Cita:

Empezado por delphi.com.ar

El "campo" type Attr del record type TSearchRec te indica del tipo de archivo que se trata.

Lo que te señala delphi.com.ar está explicado en la ayuda de delphi para esta función, creo que debes revisarla.
Saludos

La franja horaria es GMT +2. Ahora son las 01:33:31.