凡 凡人 Unregistered / Unconfirmed GUEST, unregistred user! 2000-12-03 #1 怎样实现连续打印功能，每次打印记录条数不一样，象超市POS机一样？
Y YNTW Unregistered / Unconfirmed GUEST, unregistred user! 2000-12-03 #2 用链表，开始录入数据时新建一链表，每输入一条数据增加一个节点，打印时从表头开始， 直到最后一个节点，完成后释放链表。
A abcdwang Unregistered / Unconfirmed GUEST, unregistred user! 2000-12-03 #3 我想你是要控制走纸吧,如果可以把打印机的纸长设为打印时一行的高度,打一行就换页, 不过,可能打印机不支持过小的页长.
C Chenlili Unregistered / Unconfirmed GUEST, unregistred user! 2000-12-03 #5 如果想控制走纸的话，把打印机作为字符设备来处理。 writeln(lpt,,'aasdfjkslad');
凡 凡人 Unregistered / Unconfirmed GUEST, unregistred user! 2000-12-03 #8 凡人正在编写一个收银系统，想实现这样的功能： Form上比方有一Button,当按下此Button时，开始打印收银条，打印完成后不进行走纸换页， 等待下一次按下Button，再开始打印，如此循环，直到一天收银结束，就象超市POS机 一样，请大家帮帮忙。 急、急、急！
凡人正在编写一个收银系统，想实现这样的功能： Form上比方有一Button,当按下此Button时，开始打印收银条，打印完成后不进行走纸换页， 等待下一次按下Button，再开始打印，如此循环，直到一天收银结束，就象超市POS机 一样，请大家帮帮忙。 急、急、急！
程 程云 Unregistered / Unconfirmed GUEST, unregistred user! 2000-12-03 #9 不要走找印驱动。 如下 VAR lpt :TextFile begin AssignFile( lpt, 'LPT1' ); ReWrite( lpt ); Write( lpt, '打印测试' ); Write( lpt, #12 ); //打印机换页 CloseFile( lpt ); END
不要走找印驱动。 如下 VAR lpt :TextFile begin AssignFile( lpt, 'LPT1' ); ReWrite( lpt ); Write( lpt, '打印测试' ); Write( lpt, #12 ); //打印机换页 CloseFile( lpt ); END
