dfwfindfile.pas

来自「dfw控件组V0.62」· PAS 代码 · 共 35 行

{******************************************************************************}
{          This unit is part of the Delphifreeware component package.          }
{                                                                              }
{ Filename           : DFWFindFile.pas                                         }
{ Short description  :                                                         }
{ Author             : Kambiz R. Khojasteh                                     }
{ E-Mail             : [e-mail]                                 }
{ Internet           : http://www.crosswinds.net/~khojasteh/                   }
{ Version            : 2.21                                                    }
{ Date last modified : April 16, 2000                                          }
{ Delphi versions    : Delphi 3 and up                                         }
{                                                                              }
{                                                                              }
{ Add. Copyright     :                                                         }
{                                                                              }
{ Description        :                                                         }
{                                                                              }
{ Usage              :                                                         }
{                                                                              }
{ Revision history   :                                                         }
{                                                                              }
{ This unit contains the following                                             }
{ Components       : TDFWFileFind                                              }
{ Classes          : EFindFileError                                            }
{ Types            : TFoundEvent, TNewFolderEvent, TFileAttribute,             }
{                    TFileAttributes, TSearchInfo                              }
{ Constants        : BufferSize, PathDelimiter, DirectoryAttr,                 }
{                    InvalidLocation, InvalidFilename                          }
{ Global variables :                                                           }
{ Global procedures:                                                           }
{ Global functions :                                                           }
{                                                                              }
{******************************************************************************}
{                                                                              }
{  DFW and Delphifreeware