[Synedit-user] Bug in SynEditPrint

[Kai W. <ka...@bo...>]

Hi all,

I encountered a bug in SynEditPrint and don't know how to fix it..
following code:

FOR i:=1 TO PrintDialog.Copies DO
 begin
         CASE PrintDialog.PrintRange OF
            prAllPages: SynEditPrint.Print;
            prPageNums: SynEditPrint.PrintRange(PrintDialog.FromPage, PrintDialog.ToPage);
             prSelection:
               begin
                      SynEditPrint.Lines.Text:= Memo.SelText;
                      SynEditPrint.Print;
               end;
          END;
 end;

It only works correct, when I set PrintDialog.Copies to 1, when i choose 2, it prints 4! pages, if i choose 3, 6! Why? I cannot find the bug, neither in my code nor in the syneditprint.printrange-method..

Greetings

Kai