打印图像,为什么会有时空白?--- 你还可以输入80个字符
prtimg.Picture.Bitmap.Width:=ssp.width;
prtimg.Picture.Bitmap.Height:=ssp.Height; prtimg.Picture.Bitmap.Canvas.CopyRect(prtimg.Picture.Bitmap.Canvas.ClipRect,ssp.Canvas,ssp.Canvas.ClipRect); Printer.Canvas.StretchDraw(Rect(0,0,trunc(21*0.3937008*getdevicecaps(printer.Handle,logpixelsx)),
trunc(21*0.3937008*getdevicecaps(printer.Handle,logpixelsy))),prtimg.Picture.Graphic);
printer.Canvas.TextOut(1,1,'大水印');