郁闷好几天的问题,请帮忙看看

Question

...
 try
   x:=20;
   y:=200;
        repeat   //此处为何要用repeat? 
              printer.BeginDoc;
              with printer.Canvas do begin
                adoquery1.First;
                while (not adoquery1.Eof) do                begin......

Answer 1

不用这一句的结果也是一样的（就是说：打印一页就不打印了，没有任何错误提示），这一句其实没什么作用
repeat   //此处为何要用repeat?要告诉你是：
循环过程全部正常，可是只打印出循环的一小部分：仅仅一页。纳闷！！！！！！