Do you own a Debenu Quick PDF Library version 7, 8, 9, 10, 11, 12, 13 or iSEDQuickPDF license? Upgrade to Debenu Quick PDF Library 14 today!

Debenu Quick PDF Library - PDF SDK Community Forum Homepage
Forum Home Forum Home > For Users of the Library > I need help - I can help
  New Posts New Posts RSS Feed - How to Print PDF
  FAQ FAQ  Forum Search   Register Register  Login Login

How to Print PDF

 Post Reply Post Reply
Author
Message
loufeliz View Drop Down
Beginner
Beginner


Joined: 27 Nov 05
Location: United States
Status: Offline
Points: 14
Post Options Post Options   Thanks (0) Thanks(0)   Quote loufeliz Quote  Post ReplyReply Direct Link To This Post Topic: How to Print PDF
    Posted: 27 Nov 05 at 1:25PM
Hello. Is there a reliable way of sending PDF's to print? I have been unsuccesful in get OLE automation to work with Acrobat Reader to print. I am replacing a process that utilized Word via OLE automation to create documents and print them. Word solution has been very solid, but client now wants to use PDF forms as it will result in faster processing and no MS word dependancy.

- Lou
Back to Top
Ingo View Drop Down
Moderator Group
Moderator Group
Avatar

Joined: 29 Oct 05
Status: Offline
Points: 3524
Post Options Post Options   Thanks (0) Thanks(0)   Quote Ingo Quote  Post ReplyReply Direct Link To This Post Posted: 27 Nov 05 at 4:18PM
Hi Lou!
You can do this directly with QuickPDF. Here's a code snippet (in Delphi). Please read the QP-documentation which options are possible...
...
    QP := TiSEDQuickPDF.Create;
    try
       QP.UnlockKey('MyLicenceKey');
       QP.LoadFromFile(FileName);

       If QP.Encrypted > 0 Then
          QP.Unencrypt;

       prName     := QP.GetDefaultPrinterName();
       prOptions := QP.PrintOptions(2, 1, FileName);
       QP.PrintDocument(prName, 1, pc, prOptions);

    finally

       QP.Free;

    end;
...

You can do it with Acrobat Reader, too.

...
ShellExecute(hinstance,'open',PChar(c),PChar('/p ' + FileName),nil,SW_SHOWNORMAL);
// or you can hide it complete...
ShellExecute(hinstance,'open',PChar(c),PChar('/p /h ' + FileName),nil,SW_SHOWNORMAL);


Best regards,
Ingo


Cheers,
Ingo

Back to Top
loufeliz View Drop Down
Beginner
Beginner


Joined: 27 Nov 05
Location: United States
Status: Offline
Points: 14
Post Options Post Options   Thanks (0) Thanks(0)   Quote loufeliz Quote  Post ReplyReply Direct Link To This Post Posted: 27 Nov 05 at 11:29PM

Thanks. I will give them both a try and report back here with my results.  All I have left to resolve is my font alignment (right justify numeric collumns) problem

- Lou

Back to Top
 Post Reply Post Reply
  Share Topic   

Forum Jump Forum Permissions View Drop Down

Forum Software by Web Wiz Forums® version 11.01
Copyright ©2001-2014 Web Wiz Ltd.

Copyright © 2017 Debenu. Debenu Quick PDF Library is a PDF SDK. All rights reserved. AboutContactBlogSupportOnline Store