暖 暖嗳 Unregistered / Unconfirmed GUEST, unregistred user! 2003-08-04 #1 我用TCustom编写图元,画出后要打印出来。 1.取位图,打印时总是出现空白页,为什么??
D dcshi2001 Unregistered / Unconfirmed GUEST, unregistred user! 2003-08-04 #2 不是吧,这样的事情也有阿,我叫几个高手来帮你想想办法吧
暖 暖嗳 Unregistered / Unconfirmed GUEST, unregistred user! 2003-08-04 #3 Rect.Top:=0; Rect.Left:=0; Rect.Right:=MainForm.MDIChildren[0].ClientWidth; Rect.Bottom:=MainForm.MDIChildren[0].ClientHeight; Printer.begin Doc; Printer.Canvas.StretchDraw(DestRect,Image1.Picture.Graphic); Printer.EndDoc;
Rect.Top:=0; Rect.Left:=0; Rect.Right:=MainForm.MDIChildren[0].ClientWidth; Rect.Bottom:=MainForm.MDIChildren[0].ClientHeight; Printer.begin Doc; Printer.Canvas.StretchDraw(DestRect,Image1.Picture.Graphic); Printer.EndDoc;