property OnDblClick: TNotifyEvent; // published, inherited from TControl
OnDblClick се изстрелва след втория OnClick в последователност от двойно кликване, използвайки системното време за двойно кликване и pixel slop прозорец. Параметърът Sender е самият TPdfView; екранното местоположение може да се извлече от Mouse.CursorPos и да се преобразува в клиентски координати чрез ScreenToClient.
Естествена употреба за това събитие в PDF четец е жестът "zoom-to-point": потребителят двойно кликва върху документа, за да превключва между fit-to-width и предишното ниво на zoom, опционално центрирайки изгледа върху позицията на кликване. Друг често срещан модел е използването на двойно кликване, за да се избере думата под курсора чрез извикване на CharacterIndexAtPos и след това разширяване на CurrentCharIndex / дължина на селекция около попа-дения знак.
Handler-ът за анотации/линкове на прегледача се изпълнява първи — ако потребителят двойно кликне върху линк, първият клик вече е последвал линка. Затова двойното кликване е най-добре запазено за поведение, което не влиза в конфликт с нормални жестове за навигация.
Enabled = False.PdfView1.CharacterIndexAtPos(Point(X, Y), PageNo) от свързан OnMouseDown handler, който записва позицията, след което действайте в OnDblClick.
// Toggle between fit-to-width and 100% zoom on double-click
procedure TForm1.PdfView1DblClick(Sender: TObject);
begin
if PdfView1.FitMode = pfmFitToWidth then
begin
PdfView1.FitMode := pfmNone;
PdfView1.Zoom := 1.0;
end
else
PdfView1.FitMode := pfmFitToWidth;
end;