如何缩放打印TImage上的内容。分2个部分。(200分)

  • 主题发起人 主题发起人 紫雨
  • 开始时间 开始时间

紫雨

Unregistered / Unconfirmed
GUEST, unregistred user!
1.用Canvas.StretchDraw(strect,Image1.picture.graphic);打印,纸上
没斑点(这时结果正确)
用Canvas.CopyRect(rr,Image1.Canvas, strect);打印,居然有斑点,就
象设计时的FORM,为什么?(200分)
2。如何让打印在纸上的报表大小合适。(打印不失真)
请给个小例子。(200分)
 
第一个问题我只用过第一种,所以不知道.
第二个问题如果使用quickrep需要修改quickrep的源代码,然后让quickrep的canvas.stretchDraw
适合纸张的大小,如果是quickrep还要注意控件没有设置打印机纸张的属性,需要自己添加(
默认打印机有纸张大小属性)
 
1.我打的也有斑点,但将打印机的属性设为0(最淡)则没有这个问题
 
第二个问题:
如果是自己编的报表生成程序,你应该能根据纸张大小自动计算自已报表的边距、行高、字
距和打印范围等,纸张大小可以根据Printer.PageWidth,PageHeight来得到。
 
由于我没将问题说清楚,特次道歉,感谢三位的热心帮助,我重写问题。
 
多人接受答案了。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
I
回复
0
查看
612
import
I
后退
顶部