TFtw : tree walk component, freeware with source.
       Works a bit like the Unix(tm) 'ftw' function

Version 1.00.00 : Danny Heijl (Danny.Heijl@cevi.be) Dec 17, 1996.
                  and James L. Allison (71565.303@compuserve.com)
 
Based on "traverse.pas" by James L. Allison  as I found it on the
SWAG (http://www.gdsoft.com/swag/swag.html).

The "walk_tree" function is basically unchanged, I only put a component
around it, and added a little test project for your convenience.


Version 1.00.0a: I added a "FindClose". It is needed for Win32 and
                 harmless for Win16. (Jan 01, 1997 - D. Heijl). 
 

---------------------------------------------------------------------------------
file name 	: tftw.zip
replaces	: tftw.zip
file version	: 1.00.0a
file description: freeware "File Tree Walk" component with source
target		: Delphi 1.0 and Delphi 2.0
author name	: James L. Allison (71565.303@compuserve.com) 
                : and Danny Heijl (Danny.Heijl@cevi.be)
author URL	: http://www.cevi.be/pp/danny/dhe.htm
file status	: freeware
full source	: included
category	: invisible, directory tree walking 

----------------------------------------------------------------------------------
Installation instructions :
----------------------------------------------------------------------------------

1. copy compon\*.* to your component directory

2. for 

16 bit Delphi 1.0x : install tftw16.pas in your component library
32 bit Delphi 2.0x : install tftw32.pas in your component library


3. rebuild the component library.

-----------------------------------------------------------------------------------

From this moment on you can play with the test application ptree.dpr.

Published properties :

- startpath : tfilename
- recursive : boolean
- filter : string, default 'c:\*.*'

Event method : 

- OnProcessFile : this function gets called as each file is visited
                  while walking the directory tree

Runtime property : 

- attr : file attribute type, default = faAnyFile
--------------------------------------------------------------------------------------