property OnKeyUp: TKeyEvent;
OnKeyUp è l'evento tastiera VCL standard pubblicato su TPdfView. Il
gestore parte dopo che il sistema operativo segnala un messaggio WM_KEYUP /
WM_SYSKEYUP mentre il controllo ha il focus. La firma dell'evento è
procedure(Sender: TObject; var Key: Word; Shift: TShiftState) —
Key è il codice virtual-key (VK_ESCAPE,
VK_NEXT, VK_PRIOR, …) e Shift riporta
lo stato dei modificatori al momento del rilascio
OnKeyUp scatta per ogni tasto — inclusi i tasti non carattere come le frecce
e i tasti funzione — purché TPdfView abbia il focus da tastiera. Imposta
Key a zero dentro il gestore per consumare l'evento così non
si propaga oltre (per esempio per impedire che Tab cicli il focus mentre un campo di modulo è
in modifica)
Usa OnKeyUp per implementare le scorciatoie del viewer che devono scattare al rilascio e non
alla pressione protratta — Page Down / Page Up per la navigazione, F3 per la ricerca successiva, Escape per annullare
una selezione. Le interazioni continue (panning, selezione a rettangolo) sono meglio guidate
da OnKeyDown perché il sistema auto-ripete KeyDown ma emette un solo
KeyUp per ogni rilascio fisico
Key in [VK_CONTROL, VK_SHIFT, VK_MENU] se vuoi ignorarli
procedure TForm1.PdfView1KeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
case Key of
VK_NEXT: PdfView1.PageNumber := PdfView1.PageNumber + 1;
VK_PRIOR: PdfView1.PageNumber := PdfView1.PageNumber - 1;
VK_HOME: PdfView1.PageNumber := 1;
VK_END: PdfView1.PageNumber := Pdf1.PageCount;
VK_ESCAPE: PdfView1.ClearHighlight;
end;
end;