| Class TBackup (unit Project) |
TObject
| Constructors |
constructor Create;| Functions |
function Execute:boolean;
procedure ForceDirectories(Dir: string);
procedure Free;
function QualifyPath(path:string):string;Pre : Source and Target must be qualified before using this function.
procedure CopyArchiveFiles(Path,Pattern:string);
procedure CopyFiles(Path,Pattern:string);
procedure CopyMatchingFiles(Path:string);
function FileCopy(Input,output:string;Size:LongInt):boolean;
function GetTargetPath(SourcePath:string):string;Allow Windows handling.
procedure ScanFolders(Path:string);
procedure SetPattern(value:string);
procedure SetSource(value:string);
procedure SetTarget(value:string);| Properties |
property Archive : boolean
property Pattern : string
property Source : string
property Target : string| Events |
| Variables |
FAnyError : boolean;
FArchive : boolean;
FAttribs : Integer;
FPattern : string;
FSource : string;
FSubDirs : boolean;
FTarget : string;| Constructors |
constructor Create;Init/Exit procedures
| Functions |
function Execute:boolean;Execution procedure
procedure ForceDirectories(Dir: string);
procedure Free;
function QualifyPath(path:string):string;Toolbox procedures
Pre : Source and Target must be qualified before using this function. post: Result is quarentied to exist and be qualified.
procedure CopyArchiveFiles(Path,Pattern:string);
procedure CopyFiles(Path,Pattern:string);case
procedure CopyMatchingFiles(Path:string);
function FileCopy(Input,output:string;Size:LongInt):boolean;Recursive algoritm which creates subdirs } { copied from Delphi 2.0, copyrights Borland
function GetTargetPath(SourcePath:string):string;copy single file
Allow Windows handling...
procedure ScanFolders(Path:string);Expands path and adds driveletters etc. then } { adds a trailing backslash to a string if needed
procedure SetPattern(value:string);
procedure SetSource(value:string);
procedure SetTarget(value:string);* TBackup definition *******************************************************
| Properties |
property Archive : boolean
property Pattern : string
property Source : stringpublic properties
property Target : string| Events |
| Variables |
FAnyError : boolean;
FArchive : boolean;
FAttribs : Integer;
FPattern : string;
FSource : string;
FSubDirs : boolean;
FTarget : string;