Delphi下,如何打印一张测试页? 找遍google都没有,难道这问题太弱了?

解决方案 »

  1.   

    我的弱度不够,所以我不会。你得把你用的报表控件说出来。一般报表控件都有show和print功能。也就是模拟显示和打印功能。
      

  2.   

    自己在printer的canvas里画点测试内容
      

  3.   

    uses ShellAPI, printers;
    {$R *.dfm}procedure TForm2.Button1Click(Sender: TObject);
    var
      Device, Driver, Port: Array [0..255] of Char;
      hDevMode: THandle;
    begin
      Printer.GetPrinter(Device, Driver, Port, hDevmode);
      ShInvokePrinterCommand(handle, PRINTACTION_TESTPAGE, Device, nil, true );
    end;我测试了,我系统中的虚拟打印机打印出了测试页。
    代码来源: http://stackoverflow.com/questions/5199227/how-can-send-to-print-a-test-page-to-a-printer-using-delphi恭喜 ! 如果您可以读取这个信息,则说明 Microsoft Office Document Image Writer Driver 在 ABC-PC 上的安装是正确的。以下信息描述打印机驱动程序和端口设置。提交时间 : 15:35:07 2011-12-10 计算机名 : ABC-PC 打印机名 : Microsoft Office Document Image Writer 打印机型号 : Microsoft Office Document Image Writer Driver 彩色支持 : 是端口名 : Microsoft Document Imaging Writer Port: 数据格式 : RAW 共享名 : 位置 : 注释 : 驱动程序名 : mdigraph.dll 数据文件 : mdiui.dll 配置文件 : mdiui.dll 驱动程序版本号 : 4.00 环境 : Windows NT x86 这是打印机测试页的结尾。
      

  4.   

    很难吗,为什么不找C代码,或者搜索msdn?
      

  5.   

    rundll32 printui.dll,PrintUIEntry /k /n\\计算机名\打印机名