杭州交通信息网杨善洲的孙子:delphi7中如何实现文件打印功能
来源：百度文库 编辑：杭州交通信息网 时间：2024/05/05 02:48:45
我在数据库编程过程中，有些数据表需要打印，该如何实现？
在用的时候将pinters单元加入use列表
伪代码：
assignfile(filename)
reset(filename)
assignprn(printfile)
rewrite(printfile)
printer.canvas.font := font
try
while eof(filename) do
begin
readln(...)//取一行
writeln(...)//往打印机送一行
end
finally
closefile(filename)
closefile(printfile)
end;