ADD: SyncDirs - move files to trash if enabled

This commit is contained in:
Alexander Koblov 2021-05-25 13:05:06 +03:00
commit 6077b59828

View file

@ -234,7 +234,7 @@ uses
DCClassesUtf8, uFileSystemFileSource, uFileSourceOperationOptions, DCDateTimeUtils,
uDCUtils, uFileSourceUtil, uFileSourceOperationTypes, uShowForm, uAdministrator,
uOSUtils, uLng, uMasks, Math, uClipboard, IntegerList, fMaskInputDlg, uSearchTemplate,
StrUtils, uTypes;
StrUtils, uTypes, uFileSystemDeleteOperation;
{$R *.lfm}
@ -1707,6 +1707,10 @@ begin
MessageDlg(rsMsgErrNotSupported, mtError, [mbOK], 0);
Exit(False);
end;
if (FOperation is TFileSystemDeleteOperation) then
begin
TFileSystemDeleteOperation(FOperation).Recycle:= gUseTrash;
end;
FOperation.Elevate:= ElevateAction;
FOperation.AddUserInterface(FFileSourceOperationMessageBoxesUI);
try