function LinkAtPoint(X, Y: Double): Boolean;
| X, Y | Double. Point en unités de page PDF, avec l'origine au coin inférieur gauche de la page |
| Result | Boolean. True lorsqu'une annotation de lien couvre ce point |
Demande à PDFium lui-même si un lien est présent, plutôt que de balayer les rectangles de LinkAnnotation. Le test natif honore les points quad de l'annotation, de sorte qu'un lien qui suit du texte renvoyé à la ligne est reconnu sur sa forme réelle plutôt que sur la boîte englobante qui l'entoure
Il ne répond que sur la présence. Pour lire la destination ou l'URI, parcourez LinkAnnotation et LinkAnnotationCount, ou utilisez WebLink pour les URL auto-détectées dans le texte de la page
Convertissez une position de souris en unités de page avec DeviceToPage avant d'appeler
var PX, PY: Double;
if Pdf.DeviceToPage(X, Y, 0, 0, W, H, ro0, PX, PY) then
if Pdf.LinkAtPoint(PX, PY) then
Screen.Cursor := crHandPoint;