Class TMyBackup (unit MyBackup) |
Inherits from
TCustomCopyFile
constructor Create( AOwner : TComponent );
- Déclarations publiques
procedure Backup;
function CheckFirstDisk : Boolean;
Delete file
destructor Destroy;
function GetInfos( SL : TStringList ) : Boolean;
go to the end of file
procedure Restore;
function CheckDiskContent : Boolean;
procedure CheckDrive;
procedure CheckPath;
procedure NextDisk;
procedure ReadFile( const FileName : String );
procedure ReadFiles;
procedure SetFilesRestored( val : TStringList );
procedure SetFilesToBackup( val : TStringList );
Contains the list of the files restored.
procedure WriteFile( const FileName : String );
Otherwise, backup all the filtered file from the FilesPath directory
procedure WriteFiles;
procedure WriteInfos;
reopen previous file on new disk
property BackupCaption : String
property BackupName : String
property ConfirmDelete : Boolean
property DrivePath : String
Déclarations publiées
property FilesPath : String
property FilesRestored : TStringList
property FilesToBackup : TStringList
property Filter :
Properties herited and moved in the published section
property ID : String
property IdLabel : String
property InfosFileName : String
property Progress :
property RestoreCaption : String
property UserCompany : String
property UserLicence : String
property UserName : String
property Version : String
event OnEachFile :
event OnFinishOperation :
event OnOperationProgress :
event OnStartOperation :
FBackupCaption : String;
FBackupName : String;
FConfirmDelete : Boolean;
FCurBackup : String;
FCurrentFile : String;
FDiskCount : Integer;
FDrive : Char;
FDrivePath : String;
Déclarations protégées
FFilesPath : String;
FFilesRestored : TStringList;
Contains the list of the files to be backed up.
FFilesToBackup : TStringList;
FID : String;
FIdLabel : String;
FInfosFileName : String;
FOneMoreDisk : Boolean;
FOperation : TOperation;
FRestoreCaption : String;
FUserCompany : String;
FUserLicence : String;
FUserName : String;
FVersion : String;
constructor Create( AOwner : TComponent );
Déclarations publiques
procedure Backup;
function CheckFirstDisk : Boolean;
Delete file
destructor Destroy;
function GetInfos( SL : TStringList ) : Boolean;
go to the end of file
procedure Restore;
function CheckDiskContent : Boolean;
procedure CheckDrive;
procedure CheckPath;
procedure NextDisk;
procedure ReadFile( const FileName : String );
procedure ReadFiles;
procedure SetFilesRestored( val : TStringList );
procedure SetFilesToBackup( val : TStringList );
Contains the list of the files restored.
procedure WriteFile( const FileName : String );
Otherwise, backup all the filtered file from the FilesPath directory
procedure WriteFiles;
procedure WriteInfos;
reopen previous file on new disk
property BackupCaption : String
property BackupName : String
property ConfirmDelete : Boolean
property DrivePath : String
Déclarations publiées
property FilesPath : String
property FilesRestored : TStringList
property FilesToBackup : TStringList
property Filter :
Properties herited and moved in the published section
property ID : String
property IdLabel : String
property InfosFileName : String
property Progress :
property RestoreCaption : String
property UserCompany : String
property UserLicence : String
property UserName : String
property Version : String
event OnEachFile :
event OnFinishOperation :
event OnOperationProgress :
event OnStartOperation :
FBackupCaption : String;
FBackupName : String;
FConfirmDelete : Boolean;
FCurBackup : String;
FCurrentFile : String;
FDiskCount : Integer;
FDrive : Char;
FDrivePath : String;
Déclarations protégées
FFilesPath : String;
FFilesRestored : TStringList;
Contains the list of the files to be backed up.
FFilesToBackup : TStringList;
FID : String;
FIdLabel : String;
FInfosFileName : String;
FOneMoreDisk : Boolean;
FOperation : TOperation;
FRestoreCaption : String;
FUserCompany : String;
FUserLicence : String;
FUserName : String;
FVersion : String;