用的纸张是在阵式打印机上用的两边有空的纸(我也不知道叫什么),连续有很多张,现在我打印完后,纸张继续保留在打印机中, 必须能在delphi7 下使用!!

解决方案 »

  1.   

    找个RawPrinter.pas单元,可以实现类似DOS的打印功能。
      

  2.   

    adodataset1.Close;
    adodataset1.Connection:=adoconnection1;
    adodataset1.CommandText:='SELECT * FROM storage WHERE InputDate >cast('''+edit1.text+''' as datetime) and InputDate<cast('''+edit2.text+''' as datetime)';
    adodataset1.Open;
    frreport1.PrepareReport;
    frreport1.ShowPreparedReport;
      

  3.   

    S O S ~~~~   :~(
      

  4.   

    我制作的报表打印出来要有100多页,使用的打印纸张是在阵式打印机上用的两边有圆空洞的那种(这种纸是一叠连串的)。在delphi编程时候,如何实现连续打印,即一次打印100多张不中断呢?
    要不然,打印一页后所有的纸张就退出来了啊 55
      

  5.   

    adodataset1.Close;
    adodataset1.Connection:=adoconnection1;
    adodataset1.CommandText:='SELECT * FROM storage WHERE InputDate >cast('''+edit1.text+''' as datetime) and InputDate<cast('''+edit2.text+''' as datetime)';
    adodataset1.Open;
    frreport1.PrepareReport;
    frreport1.ShowPreparedReport;
      

  6.   

    我想这和纸张大小和打印机设定有关.
    如果你设定了纸张大小, 翻页上程序上就没有问题. 
    退纸显然和你的打印机设置走纸方向有关, 这个可能需要手工设置打印机, 不是通过Windows设置.