property OnMouseWheel: TMouseWheelEvent;
ビュー上でホイールが回転したときに発火します。Sender パラメーターはイベントを発生させた TPdfView インスタンスを参照するため、Sender を調べることで 1 つのハンドラーで複数のビューに対応できます
典型的な用途には、Ctrl + ホイールでのズーム実装や既定のページスクロールの置き換えがあります。ハンドラーは VCL メインスレッドで実行されるため、フォームコントロールを更新し他の VCL API を直接呼び出せます
ハンドラーは素早く戻る必要があります。PDFium のレンダリングとフォーム入力は同じスレッドで行われ、ここでの遅延は次のページ再描画を遅らせます
TabStop を True に設定しますPdfView1.OnMouseWheel := MyHandler で割り当てることもできますTPdfView の対応する Set Cursor / Set Caret 呼び出しと組み合わせて視覚的フィードバックを同期させます
procedure TForm1.PdfViewOnMouseWheel(Sender: TObject; Shift: TShiftState; WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean);
begin
// implement Ctrl+wheel zoom or replace the default page scroll
Caption := Format('OnMouseWheel on page %d', [PdfView1.PageNumber]);
end;