小弟编一销售程序,可客户要小票打印。就是对顾客所买的东西,付了多少钱,找还多少钱,店名等进行打印。怎么实现,和普通的报表打印一样吗?

解决方案 »

  1.   

    uses Printers;     
     with Printer do
            begin
                BeginDoc;//开始
                Canvas.Font.Size:=10;
                Canvas.Font.Name:='宋体';
                Canvas.TextOut(10,0,'      '+SysMarketName+'超市交班凭据');
                //一条条往里面加内容
                EndDoc;//结尾发送打印命令
            end;
        end;
      

  2.   

    Canvas.TextOut(10,0,'      '+SysMarketName+'超市凭据');
    改成
    Canvas.TextOut(10,0,'      '+'XXXXXX超市凭据');
    SysMarketName是我程序里的变量
      

  3.   

    直接向打印机端口输出就OK了。。但是你最好要控制好你的输出格工。。writeln('LPT1','你要输出的 内容')其它的语句你可以自已写。。很简单的。。
    DELPHI5开发人员指南上面的一章专门说这个的。。
    去搞一本来看吧。。很不错的。。
      

  4.   

    噢,对了,我那个程序是在装了打印驱动以后那么做的!
    我的打印机是EPSON TMU210系列的!好运!