property OnClick: TNotifyEvent; // published, inherited from TControl
OnClick срабатывает после стандартной последовательности OnMouseDown / OnMouseUp, когда пользователь нажимает и отпускает левую кнопку мыши, не перемещая курсор достаточно далеко, чтобы это считалось перетаскиванием. Параметр Sender ссылается на сам экземпляр TPdfView; позиция курсора не передаётся, но её можно получить из Mouse.CursorPos и преобразовать через ScreenToClient
Встроенная обработка щелчка для аннотаций, веб-ссылок и полей формы выполняется до этого события — если щелчок пришёлся на переход по ссылке, переход по странице или запуск URI уже произошёл. Поэтому OnClick полезнее всего для реакций на уровне приложения: закрыть всплывающую подсказку, скрыть панель миниатюр, записать аналитическое событие или переключить режим фокуса
Если нужна более точная позиция, используйте вместо этого OnMouseDown или OnMouseUp. Чтобы отлавливать щелчки по конкретным объектам PDF (аннотациям, ссылкам, полям формы), используйте специальные события OnAnnotationLinkClick и OnWebLinkClick либо вызывайте HasFormFieldAt из OnMouseDown
OnClick, когда пользователь нажимает Enter при фокусе на просмотрщике, как и у других потомков TWinControlEnabled := False — событие не срабатывает, когда просмотрщик находится в режиме просмотра только для чтенияTThread.Queue, чтобы щелчок оставался отзывчивым
// Dismiss an overlay panel whenever the user clicks the document
procedure TForm1.PdfView1Click(Sender: TObject);
begin
if SearchPanel.Visible then
SearchPanel.Hide;
StatusBar1.SimpleText := Format('Clicked — page %d of %d',
[PdfView1.PageNumber, PdfView1.Pdf.PageCount]);
end;