怎样打印某个控件上的内容?? 在一个activex中,我只想打印出其中一个panel中的内容(里面有sharp,lable,image等),如何做到呢? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Panel.PaintTo(Printer.Canvas,0,0); 如果要自动适应打印纸,要改变 Printer.Canvas.Handle 的坐标映射方式,详细清参考Window API SetMapMode() 你一个例子: SetMapMode(pb.Canvas.Handle,MM_ANISOTROPIC); SetWindowExtEx(pb.Canvas.Handle,Panel1.Width,Panel1.Height,nil); SetViewportExtEx(pb.Canvas.Handle,pb.Width,pb.Height,nil); Panel1.PaintTo(pb.Canvas,0,0); 这里用pb: TPaintBox代替打印机 如何从内存加载DelphiXE2编译的64位DLL delphi的TMEMO可以设置列数吗 高分求助快速组合算法 这是什么病毒?是‘主页病毒’吗?怎么杀? TWebBrowser的问题 用NMUDP如何在Client端和Server端之间传递对象呢? 分享: 我的第一个DELPHI.net程序 各位 高手 解释一下??? 请教了!mnudp发送filestream,文件太大如何分包发送,又如何接收?谢谢!(急) 哪里有较大量且能用169下载的控件站点? 求助:C++语句转DELPHI 高分求..单独的三层权限管理代码
如果要自动适应打印纸,要改变 Printer.Canvas.Handle 的坐标映射方式,详细清参考Window API SetMapMode()
你一个例子:
SetMapMode(pb.Canvas.Handle,MM_ANISOTROPIC);
SetWindowExtEx(pb.Canvas.Handle,Panel1.Width,Panel1.Height,nil);
SetViewportExtEx(pb.Canvas.Handle,pb.Width,pb.Height,nil);
Panel1.PaintTo(pb.Canvas,0,0);
这里用pb: TPaintBox代替打印机