各位大侠 小弟用QuickReport 在自己的预览界面上:(能正常显示)操作:
1、预览,不点击打印,能正常关闭;
2、点击打印后,预览界面能关闭,但是不能关闭当前界面;
单步测试 发现:程序在 QuickRpt 中 不断执行 repeat
Application.HandleMessage
until (QRPrinter = nil) or (not QRPrinter.ShowingPreview) or Application.Terminated ;
end;请问要怎么才能关闭当前界面,用Application.Terminated 就把程序关掉了~~
1、预览,不点击打印,能正常关闭;
2、点击打印后,预览界面能关闭,但是不能关闭当前界面;
单步测试 发现:程序在 QuickRpt 中 不断执行 repeat
Application.HandleMessage
until (QRPrinter = nil) or (not QRPrinter.ShowingPreview) or Application.Terminated ;
end;请问要怎么才能关闭当前界面,用Application.Terminated 就把程序关掉了~~
解决方案 »
- 使用构析函数create的参数遇到的问题
- 一个高中数学问题
- 求 像 用友 "华表" 功能一样强大的 免费 的 VCL 控件?????????????
- xp和xp只能单向访问问题
- 急需寻找DELPHI中关于条形码扫描器相关的开发包和控件,在线等待,谢谢!!!!!
- 一个Update出错问题 ,急,在线等
- 散分
- 很急,在线等待。在另外的过程中要调用一个控件的click事件怎么调用?
- 关于赋值问题(急)
- Delphi中关于TQuery的Eof和RecordCount属性
- [分享] 数据库连接配置管理组件 ConnectionManager V2.0 (Full Source)
- 各位大侠,进来看看 Delphi6.0 用Qreport组件打印报表过程中如何设置控件组 便于访问?
if QRPreview1.QRPrinter.ShowingPreview then
QRPreview1.QRPrinter.ShowingPreview:=False;
先谢谢大家,分不够可以再加