Debenu Quick PDF Library - PDF SDK Community Forum : How to set the pdf-viewer-preferences http://www.quickpdf.org/forum/ Copyright (c) 2006-2013 Web Wiz Forums - All Rights Reserved. Thu, 30 Apr 2026 04:11:17 +0000 Tue, 30 Jun 2015 15:08:12 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 11.01 360 www.quickpdf.org/forum/RSS_post_feed.asp?TID=1415 <![CDATA[Debenu Quick PDF Library - PDF SDK Community Forum]]> http://www.quickpdf.org/forum/forum_images/QPDF_Forum_Title.png http://www.quickpdf.org/forum/ <![CDATA[How to set the pdf-viewer-preferences : Hi IngoGreat, thanks a lot for...]]> http://www.quickpdf.org/forum/how-to-set-the-pdfviewerpreferences_topic1415_post12590.html#12590 Author: mortendc
Subject: 1415
Posted: 30 Jun 15 at 3:08PM

Hi Ingo

Great, thanks a lot for helping out!

Kind regards 

Morten
 


]]> Tue, 30 Jun 2015 15:08:12 +0000 http://www.quickpdf.org/forum/how-to-set-the-pdfviewerpreferences_topic1415_post12590.html#12590 <![CDATA[How to set the pdf-viewer-preferences : Nice one, Ingo... Thanks! Tom...]]> http://www.quickpdf.org/forum/how-to-set-the-pdfviewerpreferences_topic1415_post6396.html#6396 Author: Shotgun Tom
Subject: 1415
Posted: 17 Apr 10 at 4:45PM

Nice one, Ingo... Thanks!
 
Tom
]]> Sat, 17 Apr 2010 16:45:32 +0000 http://www.quickpdf.org/forum/how-to-set-the-pdfviewerpreferences_topic1415_post6396.html#6396 <![CDATA[How to set the pdf-viewer-preferences : Hi!The following code is out...]]> http://www.quickpdf.org/forum/how-to-set-the-pdfviewerpreferences_topic1415_post6388.html#6388 Author: Ingo
Subject: 1415
Posted: 16 Apr 10 at 9:16PM

Hi!

The following code is out of a complete app.
There is a window where you can make all settings...
So in the code checkbox-values are used.
But this doesn't matter to you - you shall see how to call
the functions ;-)

The code is in Delphi but this should be no prob
for a developer ;-)

Cheers, Ingo


   QP  := TQuickPDF718.Create;
   try
      Save_Cursor   := Screen.Cursor;
      Screen.Cursor := crHourglass;    // Show hourglass cursor
      QP.UnlockKey('...');
      QP.LoadFromFile(Edit1.text);
      
      If QP.EncryptionStatus > 0 Then
         QP.Decrypt;

//-------------------------------------------
      if cbhtb.Checked = True Then
         QP.SetViewerPreferences(1,1)  // Hide toolbar
        Else
         QP.SetViewerPreferences(1,0);
      if cbhmb.Checked = True Then
         QP.SetViewerPreferences(2,1)  // Hide menubar
        Else
         QP.SetViewerPreferences(2,0);
      if cbhwui.Checked = True Then
         QP.SetViewerPreferences(3,1)  // Hide windows user interface
        Else
         QP.SetViewerPreferences(3,0);
      if cbrwfps.Checked = True Then
         QP.SetViewerPreferences(4,1)  // Resize window to first page size
        Else
         QP.SetViewerPreferences(4,0);
      if cbcw.Checked = True Then
         QP.SetViewerPreferences(5,1)  // Center window
        Else
         QP.SetViewerPreferences(5,0);
      if cbddt.Checked = True Then
         QP.SetViewerPreferences(6,1)  // Display document title
        Else
         QP.SetViewerPreferences(6,0);

      if cbseite.Checked = False Then
      begin
         if cbfwindow.Checked = True Then
            QP.SetOpenActionDestination(1, -1) // -1 for Fit in window
           Else
            QP.SetOpenActionDestination(1, 100);
         if cbfwidth.Checked = True Then
            QP.SetOpenActionDestination(1, -2) // -2 for Fit in Width
           Else
            QP.SetOpenActionDestination(1, 100);
         if cbzoom.Checked = True Then
            QP.SetOpenActionDestination(1, 100);// Display first page with 100%
      end;
      if cbseite.Checked = True Then
      begin
         if cbfwindow.Checked = True Then
            QP.SetOpenActionDestination(SpinEdit1.Value, -1) // -1 for Fit in window
           Else
            QP.SetOpenActionDestination(SpinEdit1.Value, 100);
         if cbfwidth.Checked = True Then
            QP.SetOpenActionDestination(SpinEdit1.Value, -2) // -2 for Fit in Width
           Else
            QP.SetOpenActionDestination(SpinEdit1.Value, 100);
         if cbzoom.Checked = True Then
            QP.SetOpenActionDestination(SpinEdit1.Value, 100);// Display first page with 100%
      end;
      QP.SaveToFile(Edit1.Text);
//-------------------------------------------
   finally
      QP.Free;
      Screen.Cursor := Save_Cursor;
   end;

   ShowMessage('Complete...');
 

Edited by Ingo - 19 Apr 10 at 6:23AM]]> Fri, 16 Apr 2010 21:16:34 +0000 http://www.quickpdf.org/forum/how-to-set-the-pdfviewerpreferences_topic1415_post6388.html#6388