Note: ◼CurrentPage may be nil if a document is not loaded or a load error occurs ◼If you interact with CurrentPage you may need to use Update to refresh the content
// Display all web links in the page cnt := ImageEnView1.PdfViewer.CurrentPage.GetWebLinkCount(); s := format( '%d Links in Page', [ cnt ]); if cnt > 0 then s := s + ':' + #13#10+ #13#10; for i := 0 to cnt - 1 do begin if i > 10 then begin s := s + #13#10 + '...'; Break; end; s := s + #13#10 + ImageEnView1.PdfViewer.CurrentPage.GetWebLinkURL( i ); end; ShowMessage( s );
// Get precise page sizes in PDF points (One point is 1/72 inch or around 0.3528 mm) ww := ImageEnView1.PdfViewer.CurrentPage.Width; hh := ImageEnView1.PdfViewer.CurrentPage.Height;