windows 2000 下如何自定义纸张大小?

解决方案 »

  1.   

    回cg1120:
    本人要在windows2000下开发一个票据打印模块,票据的类型有十几种,尺寸是五花八门,各式各样。因此为了用户使用上的方便,必须在打印时根据当前所打印的票据尺寸动态定义一个打印机纸张类型,打印完后再恢复原来设置。
    (不要对我说向打印机发控制码!!)
      

  2.   

    当然可以,但是不知道你的QUICKREP是多少版本的可以修改其一行源码,强制将自定义纸张赋为true
      

  3.   

    for I := 0 to Count - 1 do
        begin
          for J := Default to Custom do
          begin
            if cQRPaperTranslate[J] = DCResult[I] then
            begin
              FPaperSizes[J] := true;
              break;
            end
          end
        end;
        FPaperSizes[Custom] := true;   //强行将字定义纸张赋为true
    这段代码是在qurpntr.pas的4654行左右 版本2.0
                 3.6版本的行数是2168左右,不过3.6版本的已经自动加上了这行加上以后,在NT下预览可以,但是打印还是不行,不知道是否是驱动的问题。
    以上程序在delphi5+winnt/win2000下编译通过
      

  4.   

    用quickrep3.62已经可以解决问题了,只要将quickrep的pagesize设为custom size就行了quickrep3.62下载地址http://www.51delphi.com/delphi/soft?type=报表
      

  5.   

    我是想做一个自定义纸张的DLL,以供其他应用调用。
    是否要用API,如何实现?