function LinkAnnotationAtPos(X, Y: Integer; out PageNumber: Integer): Integer; overload;
function LinkAnnotationAtPos(X, Y: Integer): Integer; overload;
返回屏幕像素 (X, Y) 处的链接注释索引,或 -1
用于在未启用 LinkOptions 自动处理的情况下实现“点击跟随”UI
TPdfView 根据 Zoom、Rotation、页面内边距和滚动偏移在内部维护设备到页面的变换;这些帮助程序是该变换的安全公共接口
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;