Debenu Quick PDF Library - PDF SDK Community Forum : Scroll pages under each other (Delphi) http://www.quickpdf.org/forum/ Copyright (c) 2006-2013 Web Wiz Forums - All Rights Reserved. Mon, 04 May 2026 11:04:22 +0000 Wed, 03 Jan 2018 00:53:12 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 11.01 360 www.quickpdf.org/forum/RSS_post_feed.asp?TID=3529 <![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[Scroll pages under each other (Delphi) : Hi Mitchel,Amelies&#039; prob...]]> http://www.quickpdf.org/forum/scroll-pages-under-each-other-delphi_topic3529_post14087.html#14087 Author: Ingo
Subject: 3529
Posted: 03 Jan 18 at 12:53AM

Hi Mitchel,

Amelies' prob is different.
What she wanna see is possible if the window of the pdf-reader is large and the page zoom is small.

What for a loop and for what do you need?
Did you read already in the online reference and the developer guide?
Perhaps we can help if you have an example...
But do it in a new thread.

Cheers and welcome here,
Ingo

]]> Wed, 03 Jan 2018 00:53:12 +0000 http://www.quickpdf.org/forum/scroll-pages-under-each-other-delphi_topic3529_post14087.html#14087 <![CDATA[Scroll pages under each other (Delphi) : Ingo wrote:Hi,it&#039;snot...]]> http://www.quickpdf.org/forum/scroll-pages-under-each-other-delphi_topic3529_post14083.html#14083 Author: Mitchells
Subject: 3529
Posted: 02 Jan 18 at 12:17PM

Originally posted by Ingo Ingo wrote:

Hi,

it's not as easy as you think about it ;-)
Here's a sample you can use as a starting point:
http://www.debenu.com/kb/render-page-using-dqpl/

In your sample your preview could only be an empty page (even the white of a blank page will be missed). If one page after the other shall be displayed at first you have to determine how many pages are in the pdf. Then you have to start a loop... selecting page after page with the rendering. Your single "RenderPage" won't do anything... ;-)


Hi Ingo, how do you create such a loop? I have a similar problem and I'm stuck at this point.

Edited by Mitchells - 04 Aug 25 at 11:49AM]]> Tue, 02 Jan 2018 12:17:42 +0000 http://www.quickpdf.org/forum/scroll-pages-under-each-other-delphi_topic3529_post14083.html#14083 <![CDATA[Scroll pages under each other (Delphi) : Hi,it&#039;s not as easy as you...]]> http://www.quickpdf.org/forum/scroll-pages-under-each-other-delphi_topic3529_post14047.html#14047 Author: Ingo
Subject: 3529
Posted: 06 Dec 17 at 7:12PM

Hi,

it's not as easy as you think about it ;-)
Here's a sample you can use as a starting point:
http://www.debenu.com/kb/render-page-using-dqpl/

In your sample your preview could only be an empty page (even the white of a blank page will be missed). If one page after the other shall be displayed at first you have to determine how many pages are in the pdf. Then you have to start a loop... selecting page after page with the rendering. Your single "RenderPage" won't do anything... ;-)

]]> Wed, 06 Dec 2017 19:12:01 +0000 http://www.quickpdf.org/forum/scroll-pages-under-each-other-delphi_topic3529_post14047.html#14047 <![CDATA[Scroll pages under each other (Delphi) : Hi IngoThank you !!No, I already...]]> http://www.quickpdf.org/forum/scroll-pages-under-each-other-delphi_topic3529_post14046.html#14046 Author: Amelie
Subject: 3529
Posted: 06 Dec 17 at 6:49PM

Hi Ingo Smile

Thank you !!

No, I already read it. In the example in the "Demo" directory, you assign the display of each page to a "Timing":

procedure TfrmDemo.btnViewPrintLoadPDFClick (Sender: TObject);
var
  Password: string;
  R: Integer;
  CanProceed: Boolean;
  BlankBM: TBitmap;
begin
  if Assigned (ViewPrintQP) then
  begin
    ViewPrintQP.Free;
    ViewPrintQP: = nil;
  end;
  CanProceed: = False;
  if dlgOpen.Execute then
  begin
    ViewPrintQP: = TDebenuPDFLibrary.Create;
    if ViewPrintQP.UnlockKey (edtLicenseKey.Text) = 1 then
    begin
      if ViewPrintQP.LoadFromFile (dlgOpen.FileName, '') = 1 then
      begin
        CanProceed: = True;
      end else
        MessageDlg ('The PDF could not be opened.', MtError, [mbOK], 0);
    end else
      MessageDlg ('The license key is invalid or has expired.', MtError, [mbOK], 0);
  end;
  if CanProceed then
  begin
    ViewPrintPageNum: = 1;
    RenderPage;
  end else
  begin
    BlankBM: = TBitmap.Create;
    try
      imgPreview.Picture.Assign (BlankBM);
    finally
      BlankBM.Free;
    end;
    ViewPrintQP.Free;
    ViewPrintQP: = nil;
  end;

end;

How to have the display I want to get in a Timage? or do you have to display all the pages in another component?

Thanks for your help Smile



]]> Wed, 06 Dec 2017 18:49:13 +0000 http://www.quickpdf.org/forum/scroll-pages-under-each-other-delphi_topic3529_post14046.html#14046 <![CDATA[Scroll pages under each other (Delphi) : Hi Amelie,you don&#039;t like...]]> http://www.quickpdf.org/forum/scroll-pages-under-each-other-delphi_topic3529_post14045.html#14045 Author: Ingo
Subject: 3529
Posted: 06 Dec 17 at 5:37PM

Hi Amelie,

you don't like reading in the online reference or the developer guide i think ;-)
What you wanna get is the viewer scaling you can set inside your pdf-reader.
If you want it immediately you can set the viewer preferences with QuickPDF - so the pdf-reader will open and display your pdf like you want it.
Have a look at an older post of mine:
http://www.quickpdf.org/forum/how-to-set-the-pdfviewerpreferences_topic1415.html

]]> Wed, 06 Dec 2017 17:37:10 +0000 http://www.quickpdf.org/forum/scroll-pages-under-each-other-delphi_topic3529_post14045.html#14045 <![CDATA[Scroll pages under each other (Delphi) : Hello !is it possible please to...]]> http://www.quickpdf.org/forum/scroll-pages-under-each-other-delphi_topic3529_post14044.html#14044 Author: Amelie
Subject: 3529
Posted: 06 Dec 17 at 5:21PM

Hello Smile!

is it possible please to see all pages of a PDF file as the attached image?
Scroll pages under each other.

How to do this please?


Thank you.

Best regards.

Amelie
]]> Wed, 06 Dec 2017 17:21:12 +0000 http://www.quickpdf.org/forum/scroll-pages-under-each-other-delphi_topic3529_post14044.html#14044