diff --git a/components/printers/win32/winprndialogs.inc b/components/printers/win32/winprndialogs.inc
index b824593bd2..2fc0698d92 100644
--- a/components/printers/win32/winprndialogs.inc
+++ b/components/printers/win32/winprndialogs.inc
@@ -238,6 +238,7 @@ begin
         nToPage := Word(ToPage);
         nMinPage := Word(MinPage);
         nMaxPage := Word(MaxPage);
+        DevMode^.dmCopies := nCopies;
         
         if PrintDlg(lpp) then
         begin