要做收据打印,在预览的时候应该给用户看到完整收据的内容,但是打印的时候却是只需要打印其中的一些数据,怎样控制这些数据在预览时是可见的,而打印的时候则不打印?
急~~~~~~~~~~,请多多帮忙!谢谢!
急~~~~~~~~~~,请多多帮忙!谢谢!
解决方案 »
- delphi Excel 导出数据
- SOCKET通信问题
- 求一个webservices的原程序(客户端提交一条sql语句,服务器返回数据结果)
- AdoConnection如何连接excel文件(.xls)????
- 如何处理中文字符?
- 如何把一个ActiveForm充满IE的窗口?
- 利用套接字实现一个服务器多个客户端的程序时出现问题!(100分)
- 从零学Delphi数据库编程忘大家推荐几本书,高分相送。
- 如何在TMEMO中在指定行插入指定字符
- 怎样使用Tregistry对象的WriteBinaryData方法向注册表中的添加二进制值?(请举例说明)
- 为什么下面这段程序只能创建Edit,而不能创建Label?
- 这个怎么做?
关注,,
也只能这样。
procedure DisablePrintbleLabel(Frm: Tform);
var
i : integer;
begin
for i := 0 to frm.ComponentCount - 1 do
begin
if copy(frm.Components[i].name, 1, 4) = 'nop_' then
begin
TQRPrintable(frm.Components[i]).enabled := false;
end;
end;
end;
我是可以在调用print前先调用这个处理过程,但只是限于直接用户直接打印的时候,
如果用户是先预览,显示预览窗体后,用户点击的是预览界面上的打印按钮,那我就没有办法这样处理了。原打算在beforeprint事件中执行一段代码,即判断是预览还是打印,然后做不同的处理,问题是我不知道怎样判断是预览还是打印。有人说有个属性可以判断,但是我查帮助查资料都没有找到那个属性:(((。请大家继续指点。谢谢!