P Pipi. Unregistered / Unconfirmed GUEST, unregistred user! 2002-02-12 #2 var MyFile: TextFile; begin AssignPrn(MyFile); Rewrite(MyFile); Writeln(MyFile, '打印的文字'); //象fox一样想打一行就打一行 System.CloseFile(MyFile); end; 上面的不是直接输入,是用图形仿真text输出,如果有需要的话用Printer可以控制字体、换页等
var MyFile: TextFile; begin AssignPrn(MyFile); Rewrite(MyFile); Writeln(MyFile, '打印的文字'); //象fox一样想打一行就打一行 System.CloseFile(MyFile); end; 上面的不是直接输入,是用图形仿真text输出,如果有需要的话用Printer可以控制字体、换页等
L lvxq Unregistered / Unconfirmed GUEST, unregistred user! 2002-02-13 #3 With printerdo begin .pen:= ..... .textout(....) end;
F fresh Unregistered / Unconfirmed GUEST, unregistred user! 2002-02-15 #4 不会吧!我想楼上的‘控制每行的输出内容’有问题 Writeln(MyFile, '打印的文字1'); Writeln(MyFile, '打印的文字2'); 两行一起打印