ADD: support fsoCopyIn in TMountedFileSource

This commit is contained in:
rich2014 2024-11-24 21:09:59 +08:00
commit df3652d707

View file

@ -52,6 +52,9 @@ type
function GetProperties: TFileSourceProperties; override;
function GetOperationsTypes: TFileSourceOperationTypes; override;
function CreateListOperation(TargetPath: String): TFileSourceOperation; override;
function CreateCopyInOperation(SourceFileSource: IFileSource;
var SourceFiles: TFiles; TargetPath: String): TFileSourceOperation;
override;
function CreateCopyOutOperation(TargetFileSource: IFileSource;
var SourceFiles: TFiles; TargetPath: String): TFileSourceOperation;
override;
@ -175,6 +178,18 @@ begin
Result:= TMountedListOperation.Create( self, TargetPath );
end;
function TMountedFileSource.CreateCopyInOperation(
SourceFileSource: IFileSource; var SourceFiles: TFiles; TargetPath: String
): TFileSourceOperation;
var
fs: TFileSystemFileSource;
realPath: String;
begin
fs:= TFileSystemFileSource.create;
realPath:= getRealPath( TargetPath );
Result:= fs.CreateCopyInOperation( SourceFileSource, SourceFiles, RealPath );
end;
function TMountedFileSource.CreateCopyOutOperation(
TargetFileSource: IFileSource; var SourceFiles: TFiles; TargetPath: String
): TFileSourceOperation;