delphi实现打印报表功能.docxVIP

  • 43
  • 0
  • 约2.01千字
  • 约 2页
  • 2021-11-26 发布于江苏
  • 举报
delphi 里自带有打印相关控件吗?怎么实现呀?打印dagrid 表内容,或者说 memo,Listbox,或者几个edit 的内容。谢谢 uses printers var lines:integer; prntext:system.text; begin if printdialog1.execute then try assignprn(prntext); //将 PRNTEST 分配给打印机rewrite(prntext); //调用 REWRITE 函数,为输出打开已分配的文件printer.canvas.font:=memo1.font; //把当前MEMO1 的字体指定给打印对象的CANVAS 的字体属性 for lines:=0 to memo1.lines.count-1 do begin writeln(prntext,memo1.lines[lines]); end; //把 MEMO 的内容写到打印机对象system.close(prntext); //关闭打印文件 except abort; end; end; ===================== 在网上看到好多第三方的打印控件我想问 ReportBuilder ReportMachine QuickReport FastReport 这几种打印控件的优缺点 哪个最好用,哪个并发简单快捷? 这些都

文档评论(0)

1亿VIP精品文档

相关文档