mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-21 09:58:13 +00:00
Code Issues Projects Releases Packages Wiki Activity

ADD/StashFS: step-21: support wipe/split/combine/calcStatistics

Browse source
This commit is contained in:
rich2014 2026-06-07 19:12:32 +08:00
commit 4e7a2ccba3
1 changed files with 33 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

34
src/filesources/stash/ustashfilesource.pas
View file

@ -64,6 +64,10 @@ type
function CreateCopyInOperation(SourceFileSource: IFileSource; var SourceFiles: TFiles; TargetPath: String): TFileSourceOperation; override;
function CreateCopyOutOperation(TargetFileSource: IFileSource; var SourceFiles: TFiles; TargetPath: String): TFileSourceOperation; override;
function CreateDeleteOperation(var FilesToDelete: TFiles): TFileSourceOperation; override;
function CreateWipeOperation(var FilesToWipe: TFiles): TFileSourceOperation; override;
function CreateSplitOperation(var aSourceFile: TFile; aTargetPath: String): TFileSourceOperation; override;
function CreateCombineOperation(var theSourceFiles: TFiles; aTargetFile: String): TFileSourceOperation; override;
function CreateCalcStatisticsOperation(var theFiles: TFiles): TFileSourceOperation; override;
function CreateSetFilePropertyOperation(var theTargetFiles: TFiles; var theNewProperties: TFileProperties): TFileSourceOperation; override;
function QueryContextMenu(AFiles: TFiles; var AMenu: TPopupMenu): Boolean; override;
@ -294,7 +298,12 @@ end;
function TStashFileSource.GetOperationsTypes: TFileSourceOperationTypes;
begin
Result:= [fsoList, fsoCopyIn, fsoCopyOut, fsoDelete, fsoSetFileProperty];
Result:= [fsoList,
fsoCopyIn, fsoCopyOut,
fsoDelete, fsoWipe,
fsoSplit, fsoCombine,
fsoCalcStatistics,
fsoSetFileProperty];
end;
class function TStashFileSource.CreateFile(const APath: String): TFile;
@ -338,6 +347,29 @@ begin
Result:= _fileSystemFS.CreateDeleteOperation( FilesToDelete );
end;
function TStashFileSource.CreateWipeOperation(var FilesToWipe: TFiles): TFileSourceOperation;
begin
Result:= _fileSystemFS.CreateWipeOperation( FilesToWipe );
end;
function TStashFileSource.CreateSplitOperation(var aSourceFile: TFile;
aTargetPath: String): TFileSourceOperation;
begin
Result:= _fileSystemFS.CreateSplitOperation(aSourceFile, aTargetPath);
end;
function TStashFileSource.CreateCombineOperation(var theSourceFiles: TFiles;
aTargetFile: String): TFileSourceOperation;
begin
Result:= _fileSystemFS.CreateCombineOperation(theSourceFiles, aTargetFile);
end;
function TStashFileSource.CreateCalcStatisticsOperation(var theFiles: TFiles
): TFileSourceOperation;
begin
Result:= _fileSystemFS.CreateCalcStatisticsOperation(theFiles);
end;
function TStashFileSource.CreateSetFilePropertyOperation(
var theTargetFiles: TFiles; var theNewProperties: TFileProperties
): TFileSourceOperation;