Debenu Quick PDF Library - PDF SDK Community Forum : "Phantom" Images http://www.quickpdf.org/forum/ Copyright (c) 2006-2013 Web Wiz Forums - All Rights Reserved. Thu, 30 Apr 2026 23:37:28 +0000 Thu, 04 Oct 2018 17:49:18 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 11.01 360 www.quickpdf.org/forum/RSS_post_feed.asp?TID=3614 <![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["Phantom" Images : Solved it!pdfdoc.GetImageListItemIntProperty(imgl,i,401)...]]> http://www.quickpdf.org/forum/phantom-images_topic3614_post14378.html#14378 Author: John Whitham
Subject: 3614
Posted: 04 Oct 18 at 5:49PM

Solved it! pdfdoc.GetImageListItemIntProperty(imgl,i,401) returns 1 on a cleared image so it can be discounted.]]> Thu, 04 Oct 2018 17:49:18 +0000 http://www.quickpdf.org/forum/phantom-images_topic3614_post14378.html#14378 <![CDATA["Phantom" Images : Replying to myself as no edit...]]> http://www.quickpdf.org/forum/phantom-images_topic3614_post14376.html#14376 Author: John Whitham
Subject: 3614
Posted: 04 Oct 18 at 4:44PM

Replying to myself as no edit function: Delphi 10.2.3 Tokyo and QuickPDF 13.12]]> Thu, 04 Oct 2018 16:44:18 +0000 http://www.quickpdf.org/forum/phantom-images_topic3614_post14376.html#14376 <![CDATA["Phantom" Images : I use the following code in a...]]> http://www.quickpdf.org/forum/phantom-images_topic3614_post14374.html#14374 Author: John Whitham
Subject: 3614
Posted: 04 Oct 18 at 4:38PM

I use the following code in a MouseUp event on a TPaintbox to find if the user has selected an image in the underlying pdf

    ...imgl := pdfdoc.GetPageImageList(0);
    if imgl > 0 then
    begin
      dpi := paintbox2.Height / (pdfdoc.PageHeight /25.4);
      curpos := point(x,y);
      cx := curpos.X / dpi * 25.4;
      cy := curpos.Y / dpi * 25.4;
      for i := 1 to pdfdoc.GetImageListCount(imgl) do
      begin
        il := pdfdoc.GetImageListItemDblProperty(imgl,i,501);
        it := pdfdoc.GetImageListItemDblProperty(imgl,i,502);
        ir := pdfdoc.GetImageListItemDblProperty(imgl,i,503);
        ib := pdfdoc.GetImageListItemDblProperty(imgl,i,506);
        if (cx >= il) and (cx <= ir) and (cy >= it) and (cy <= ib) then
          break;
      end;
      if i <= pdfdoc.GetImageListCount(imgl) then...

this works fine initially, but after calling pdfdoc.ClearImage() on some moved or deletedimages it starts finding images where there are none. I suspect it finds where they used to be. Can anyone confirm this?
]]> Thu, 04 Oct 2018 16:38:15 +0000 http://www.quickpdf.org/forum/phantom-images_topic3614_post14374.html#14374