P
ppcs
Unregistered / Unconfirmed
GUEST, unregistred user!
QRReport生成预览后，怎样把在没有用户干预的情况下（不要用户自己保存）把生成的数据流存入 .qrp文件。
解决方案1：
QuickRep1AfterPreview(Sender: TObject);
begin
QuickRep1.Printer.Save('c:/test2.qrp');
end;
缺点：在关闭之前不会保存，只有在关闭预览的时候才会生成，要求在预览生成后立刻保
存。不能采用此方法。
解决方案2：
更改QRReport 的基类
如：在QRReport 源文件 unit QRPrev 的 procedure TQRStandardPreview.Show;中添加
save；或者在 其它的源文件里边修改。
缺点：要修改QRReport 的基类，因为Show不支持 override；而且对于以后的管理造成极大
的不便，不能采用此方法。
总之一句话：怎样在预览后关闭前激发自动保存功能。
不清楚问题的请提问，分数不够别的地方再加。
解决方案1：
QuickRep1AfterPreview(Sender: TObject);
begin
QuickRep1.Printer.Save('c:/test2.qrp');
end;
缺点：在关闭之前不会保存，只有在关闭预览的时候才会生成，要求在预览生成后立刻保
存。不能采用此方法。
解决方案2：
更改QRReport 的基类
如：在QRReport 源文件 unit QRPrev 的 procedure TQRStandardPreview.Show;中添加
save；或者在 其它的源文件里边修改。
缺点：要修改QRReport 的基类，因为Show不支持 override；而且对于以后的管理造成极大
的不便，不能采用此方法。
总之一句话：怎样在预览后关闭前激发自动保存功能。
不清楚问题的请提问，分数不够别的地方再加。
