无限长无缝打印很难实现。 (除非直接Prn端口输出,
或打印机驱动支持)。
Windows 打印机是一种基于页面描述排版的打印,
它处理时, 是对一个整页的页面进行处理, 并且输出
都是以页为单位, 进行打印输出。
附一段打印代码:
Uses Printers ;
var myfile :textFile ;
i: integer ;
begin
assignPrn(MyFile);
rewrite(myfile);
For i: =0 to 1000do
writeln(myfile,'hello world!');
system.closefile(myfile);
end;
另外看看这个<a href:=DispQ.asp?LID=122705>问题</a>, 希望有所启发。