在线急待一个POS专用打印机的纸长控制问题?

Question

目前偶正在做一个超市的管理软件,要用POS专用打印机打印出销售单,我用QUICKREPORT来做打印,发现打印时,打印纸的长度不能在运行时改变,这样当销售单记录少时,纸就浪费了,记录多时就分成好几次打印,请问能不能控制,可以的话又怎么样控制,或者是只能自个编打印程序(而不用QUICKREPORT)(请给一个例子哦)吗?

Answer 1

POS专用打印机是针式打印机，用QR不好控制走纸，用直接打印字符
的方法可以控制走纸，当然打印机要有硬字库。

Answer 2

var
  prn: TextFile;
  str: String;
begin
  Assignfile(prn,'com1');  // or 'com1(LPT1)'
  Rewrite(prn);
  str := #27'a';
  Writeln(prn, str);   //控制码 如：chr(27)+'a'、打印内容
  CloseFile(prn);
end;