191问答库 > delphi 中的 quickrep 应用时，在打印预览时，只允许用预览，不允许打印，有什么办法？

delphi 中的 quickrep 应用时，在打印预览时，只允许用预览，不允许打印，有什么办法？

2025-05-17 03:29:31

推荐回答（1个）

回答1：

frmprint.QuickRep1.Preview ;这是打印预览。
frmprint.QuickRep1.Print ;这是直接打印。
你也可这样在一个按纽里有以下语句，点另外一个按纽就实现打印了，而且代码就不用重复写
if tBitBtn(Sender)=BitBtn5 then frmprint.QuickRep1.Preview ;
if tBitBtn(Sender)=BitBtn6 then frmprint.QuickRep1.Print ;