function LinkAnnotationAtPos(X, Y: Integer; out PageNumber: Integer): Integer; overload;
function LinkAnnotationAtPos(X, Y: Integer): Integer; overload;
Επιστρέφει τον δείκτη link-annotation στο εικονοστοιχείο οθόνης (X, Y), ή -1.
Χρησιμοποιήστε το για υλοποίηση UI "κλικ για ακολούθηση" χωρίς ενεργοποίηση αυτόματου χειρισμού LinkOptions.
Το TPdfView διατηρεί τον μετασχηματισμό συσκευής-σε-σελίδα εσωτερικά με βάση το Zoom, το Rotation, την πλήρωση σελίδας και τη μετατόπιση κύλισης· αυτά τα βοηθήματα είναι το ασφαλές δημόσιο interface σε αυτόν τον μετασχηματισμό.
PageNumber := ακυρώνουν τις αποθηκευμένες συντεταγμένες.Rotation, οπότε μια σελίδα περιστραμμένη 90° εξακολουθεί να αντιστοιχεί στο σωστό ορθογώνιο PDF.
procedure TForm1.PdfView1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
var
PageX, PageY: Double;
begin
if PdfView1.LinkAnnotationAtPos(X, Y, PageX, PageY) then
Caption := Format('pt = (%.2f, %.2f)', [PageX, PageY]);
end;