L lwdelphibbs Unregistered / Unconfirmed GUEST, unregistred user! 2003-12-23 #1 各位大虾,请问form中的panel(包括一些label和edit)怎么打印呢?在线等待![?]
L lwdelphibbs Unregistered / Unconfirmed GUEST, unregistred user! 2003-12-23 #2 请问斑竹houyg和cAkk,这个问题不难把,怎么没人回复呢?[]
J jackchin Unregistered / Unconfirmed GUEST, unregistred user! 2003-12-24 #3 大概可以这样写,但打出来的比例需要调整 implementation {$R *.DFM} uses printers; procedure TForm1.Button1Click(Sender: TObject); begin Printer.begin Doc; Panel1.PaintTo(Printer.Canvas.Handle, 0, 0); Printer.EndDoc; end;
大概可以这样写,但打出来的比例需要调整 implementation {$R *.DFM} uses printers; procedure TForm1.Button1Click(Sender: TObject); begin Printer.begin Doc; Panel1.PaintTo(Printer.Canvas.Handle, 0, 0); Printer.EndDoc; end;