function LinkAtPoint(X, Y: Double): Boolean;
| X, Y | Double. Punto en unidades de página PDF, con el origen en la esquina inferior izquierda de la página |
| Result | Boolean. True cuando una anotación de enlace cubre ese punto |
Pregunta al propio PDFium si hay un enlace presente, en lugar de recorrer los rectángulos de LinkAnnotation. La prueba nativa respeta los quad points de la anotación, de modo que un enlace que sigue texto con ajuste de línea coincide por su forma real y no por el cuadro delimitador que lo encierra
Responde solo la presencia. Para leer el destino o el URI, recorra LinkAnnotation y LinkAnnotationCount, o use WebLink para las URL detectadas automáticamente en el texto de la página
Convierta una posición del mouse a unidades de página con DeviceToPage antes de llamar
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;