Trabajando con archivos

[!3d1@n]

Hola ...
Les comento que me alegra muchísimo haber podido encontrar esa función (la 158 del Trucomanía), pero ... en si no es lo que necesito.
Les explico mejor:
Supongamos que tengo en esta dirección (c:\arc) x cantidad de Archivos, lo cual necesito saber el valor de esa x (es desir la cantidad de archivos que contiene la carpeta arc que esta en c:\) .

nota : Estos archivos sus atributos son normales, es desir no estan ocultos ni tampoco son de solo lectura.

Tomando lo de HECTOR RANDOLPH (FindFirst, FindNext, FindClose) tengo la sgte idea pero me gustaria que me ayudaran a formularla.

Código Delphi [-]
var 
i : integer;
Procedure ...
begin
if (mando a buscar el primer archivo) then
         begin 
         Repeat
         inc(i) ;
         Until (hasta que ya no halla próximo fichero) 
         Cierro la busuqeda.
         end;
ShowMessage(IntToStr(i)); // en i obtengo la cantidad de ficheros.
end;

Bueno como vieron este es el adgoritmo que creo que me solucionará mi cuestión, por favor no creo que este del todo mal pero me gustaría que me comentaran hacerca de el. Y lo mas importante es que no se como emplear el Findfirst, FindNext y FindClose.

nota : Estube viendo la ayuda de delphi pero les seré sincero, no la he entendido aun.

En espera de su Ayuda un servidor.