打印时的显示问题(100分)

我在打印的时候如果有20页,就一直等待,1to2,1to3,1to4......1to20.太慢了,那个属性是设置全部页显示啊?
就是程序执行时Preview时,如果有很多页等待的时间很长.我 记得在Qreport里面有个属性设置可以直接SHOW出来.水晶报表我不熟悉啊,如果我打印100页的话,Execute时,preview时显示一页邓一秒也要等100秒啊,
Crpe1.WindowButtonBar.PrintSetupBtn := True;
Crpe1.PrintOptions.Copies := iNumCopies;
Crpe1.PrintOptions.StartPage := iStartPage;
Crpe1.PrintOptions.StopPage := iStopPage;
Crpe1.PrintOptions.Collation := bCollation;
if sender = BtnPreview then
Crpe1.OutPut := toWindow
else
Crpe1.OutPut := toPrinter;
FrmSysMain.ShowProgressAt(2, 3);
do
ReportFontChange(crpe1);
FrmSysMain.ShowProgressAt(3, 3);
Crpe1.Execute;
这些代码没有问题啊,怎么Execute除全部页面?

在线等待

怎么没有人回答啊

说详细点

就是程序执行时Preview时,如果有很多页等待的时间很长.我 记得在Qreport里面有个属性设置可以直接SHOW出来.水晶报表我不熟悉啊,不知道明白一丝没有?

怎么没有人回答啊

还是没有人回答啊,急啊,如果我打印100页的话,Execute时,preview时显示一页邓一秒也要等100秒啊,怎么解决?大哥大姐帮忙啊?

bangmang 帮忙啊

高手都到那里去了??帮忙啊兄弟门

大富翁里面没有高手啊,比较简单的问题就是没有人回答啊

不要preview ,似乎是 print 直接执行哦