各位大虾,请问form中的panel(包括一些label和edit)怎么打印呢?在线等待!(50分)

  • 主题发起人 主题发起人 lwdelphibbs
  • 开始时间 开始时间
L

lwdelphibbs

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