P Pipi. Unregistered / Unconfirmed GUEST, unregistred user! 2001-02-05 #2 GetDesktopWindow hdc=GetWindowDC canvas=TCanvas.Create 把得到的hdc赋给canvas.handle Printer.BeginDoc 把canvas拷贝到 Printer.Canvas Printer.EndDoc ReleaseDC hdc
GetDesktopWindow hdc=GetWindowDC canvas=TCanvas.Create 把得到的hdc赋给canvas.handle Printer.BeginDoc 把canvas拷贝到 Printer.Canvas Printer.EndDoc ReleaseDC hdc
P Pipi. Unregistered / Unconfirmed GUEST, unregistred user! 2001-02-05 #4 全部要用到的api都写出来还不清楚啊 hwnd=GetDesktopWindow hdc=GetWindowDC(hwnd) canvas=TCanvas.Create canvas.handle=hdc Printer.BeginDoc Printer.Canvas.CopyRect(...,canvas,...) Printer.EndDoc canvas.free ReleaseDC(hwnd, hdc)
全部要用到的api都写出来还不清楚啊 hwnd=GetDesktopWindow hdc=GetWindowDC(hwnd) canvas=TCanvas.Create canvas.handle=hdc Printer.BeginDoc Printer.Canvas.CopyRect(...,canvas,...) Printer.EndDoc canvas.free ReleaseDC(hwnd, hdc)
S scy_fjqz Unregistered / Unconfirmed GUEST, unregistred user! 2001-02-06 #5 我想打印屏幕的时候,能够设置打印机参数, 就想我们打印word2000时, 有一个打印设置, 赐教!
郭 郭镇松 Unregistered / Unconfirmed GUEST, unregistred user! 2001-02-06 #6 放一printerdialog, 在打印之前, printerdialog.execute;
徐 徐永进 Unregistered / Unconfirmed GUEST, unregistred user! 2001-02-06 #7 你接着加入PRINTDIALOG不就行了!! 思路为 拷贝屏幕到CANVAS或者是BITMAP 然后打印!!
S scy_fjqz Unregistered / Unconfirmed GUEST, unregistred user! 2001-02-06 #9 我试了一下,发现打印出来的很怪,不是打印屏幕,而是 一些横状块的东西,为什么啊?
P Pipi. Unregistered / Unconfirmed GUEST, unregistred user! 2001-02-27 #11 把 MyRect := Rect(0,0,800,600); MyOther := Rect(0,0,Printer.PaperWidth,Printer.PaperHeight); 放在 printdialog1.Execute 后面 你原来的是把 屏幕的 10x10点 放大到打印机的 790x790 点当然古怪了
把 MyRect := Rect(0,0,800,600); MyOther := Rect(0,0,Printer.PaperWidth,Printer.PaperHeight); 放在 printdialog1.Execute 后面 你原来的是把 屏幕的 10x10点 放大到打印机的 790x790 点当然古怪了