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 را تولید میکند (همسو با سایر فرزندان TWinControl)Enabled := False غیرفعال میشود — این رویداد وقتی نمایشگر در حالت پیشنمایش فقطخواندنی است فعال نمیشودTThread.Queue صف کنید تا کلیک پاسخگو بماند
// بستن یک پنل پوشش هر بار که کاربر روی سند کلیک میکند
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;