FIX: Bug [0001356] Unhandled exception: Exception: No files selected.

This commit is contained in:
Alexander Koblov 2016-04-19 17:43:15 +00:00
commit aba36fe0c6

View file

@ -2259,10 +2259,9 @@ begin
if Assigned(theFilesToDelete) then
try
if (theFilesToDelete.Count = 0) then Exit;
Message:= frmMain.GetFileDlgStr(MsgDelSel,MsgDelFlDr,theFilesToDelete);
if (theFilesToDelete.Count > 0) and
((not bConfirmation) or
(ShowDeleteDialog(Message, FileSource, QueueId))) then
if (bConfirmation = False) or (ShowDeleteDialog(Message, FileSource, QueueId)) then
begin
if FileSource.IsClass(TFileSystemFileSource) and
frmMain.NotActiveFrame.FileSource.IsClass(TFileSystemFileSource) then
@ -2300,8 +2299,7 @@ begin
end;
finally
if Assigned(theFilesToDelete) then
FreeAndNil(theFilesToDelete);
FreeAndNil(theFilesToDelete);
end;
end;
end;