一个简单的quickrep的打印预览问题?非常急,在线等待!

zlccc 2003-09-25 03:12:31
在使用quickrep的preview过程时,delphi 6正常显示了预览界面,其中在预览界面的顶端有一个打印和一个打印设置按钮,点击时弹出出错对话框,程序出错!(我还没有安装打印机,但我想编程来让程序提示我没有打印机或其他问题)
我不知道怎样编写这个系统创建的预览界面中的 打印和打印设置按钮的click事件,以便配置我的打印机!或者有没有其他方法实现它。

我只调用了quickrep的preview过程,还不会其他方法。
...全文
47 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
zlccc 2003-09-25
  • 打赏
  • 举报
回复
我的计算机虽然没有打印机,但是已经可以与览。

但是我想在调用preview过程中,预览时点击打印或者打印设置时,能谈出 信息,不如‘没有打印机!’。
WWWWA 2003-09-25
  • 打赏
  • 举报
回复
QR在没有打印机的情况下不能预览,你可以安装一虚拟打印机
zlccc 2003-09-25
  • 打赏
  • 举报
回复
这样当然可以,但是我想在没有打印机的情况下,也可以与览。
如何在如览窗口内添加呢?
非常感谢!
WWWWA 2003-09-25
  • 打赏
  • 举报
回复
USES PRINTERS 在代码单元的前面,在USES 后面,
IF PRINTER。PRINTERS。COUNT=0 在按钮事件中,或者在QR预览
之前
WWWWA 2003-09-25
  • 打赏
  • 举报
回复
USES PRINTERS 在代码单元的前面,在USES 后面,
IF PRINTER。PRINTERS。COUNT=0 在按钮事件中,或者在QR预览
之前
zlccc 2003-09-25
  • 打赏
  • 举报
回复
你好,谢谢!还是不太明白!!
在什么地方添加呢?
USES PRINTERS
IF PRINTER。PRINTERS。COUNT=0 THEN 无打印机
我想在点击打印和一个打印设置按钮时,添加上述代码,但是在 在什么地方添加呢?


WWWWA 2003-09-25
  • 打赏
  • 举报
回复
USES PRINTERS
IF PRINTER。PRINTERS。COUNT=0 THEN 无打印机

5,939

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧