Hi,
wäre es nicht auch nützlich, in das FOnDirectoryFind noch einen Parameter IgnoreDirectory einzuführen?
Delphi-Quellcode:
TOnDirectoryFind = procedure(Directory: string;
const Info: TWin32FindData;
var Cancel: Boolean;
var IgnoreDirectory: Boolean) of object;