examples fixed compilation

git-svn-id: trunk@16239 -
This commit is contained in:
mattias 2008-08-25 22:51:22 +00:00
parent ce192d3f70
commit 3dd7e95998

View File

@ -82,7 +82,7 @@ unit FileFind;
interface
uses LResources,
SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
SysUtils, Classes, FileUtil, Graphics, Controls, Forms, Dialogs;
type
TFindFileEvent = procedure(fullpath:string;info:TSearchRec)of object;