mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-28 10:02:14 +00:00
Code Issues Projects Releases Packages Wiki Activity

FIX: Bug [2955066] Split file

Browse source
This commit is contained in:
Alexander Koblov 2010-02-21 12:29:03 +00:00
commit b1e12c3062
1 changed files with 6 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

6
src/fsplitter.pas
View file

@ -149,6 +149,12 @@ begin
end;
try
if iFileSize >= fSource.Size then
begin
memWatch.Append(rsSplitErrSplitFile);
//Unable to split the file!
exit;
end;
prgbrDoIt.Max:=(fSource.Size div iFileSize);
if prgbrDoIt.Max=0 then
begin