- 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)