summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--UMain.pas4
1 files changed, 2 insertions, 2 deletions
diff --git a/UMain.pas b/UMain.pas
index 703f197..252e557 100644
--- a/UMain.pas
+++ b/UMain.pas
@@ -2014,11 +2014,11 @@ begin
for i := 0 to DataList.Count - 1 do begin
Data := DataList[i];
if (not Data^.UpDir) and ((not Data^.IsDir) or (Data^.IsDir and (Data^.Size > 0))) then begin
- Inc(TotalSize, Data^.Size);
+ TotalSize := TotalSize + Data^.Size;
if not Data^.IsDir then Inc(TotalFiles);
if Data^.Selected then begin
if not Data^.IsDir then Inc(NumSel);
- Inc(Size, Data^.Size);
+ Size := Size + Data^.Size;
end;
end;
end;