property OnKeyUp: TKeyEvent;
OnKeyUp is de standaard VCL-toetsenbordgebeurtenis gepubliceerd op TPdfView. De
afhandelingsroutine draait nadat het besturingssysteem een WM_KEYUP /
WM_SYSKEYUP-bericht rapporteert terwijl het besturingselement focus heeft. De gebeurtenishandtekening is
procedure(Sender: TObject; var Key: Word; Shift: TShiftState) —
Key is de virtuele-sleutelcode (VK_ESCAPE,
VK_NEXT, VK_PRIOR, …) en Shift rapporteert
de modificatortoestand op het moment van loslaten.
OnKeyUp treedt op voor elke toets — inclusief niet-teken toetsen zoals pijltoetsen
en functietoetsen — mits TPdfView toetsenbordfocus heeft. Stel
Key in op nul binnen de afhandelingsroutine om de gebeurtenis te consumeren zodat deze niet verder
propagatieert (bijvoorbeeld om te voorkomen dat Tab de focus laat wisselen wanneer een formulierveld
wordt bewerkt).
Gebruik OnKeyUp om viewersneltoetsen te implementeren die bij loslaten in plaats van
ingedrukt houden moeten afgaan — Page Down / Page Up voor navigatie, F3 voor zoek-volgende, Escape om een
selectie te sluiten. Continue interacties (pannen, luikenselectie) worden beter aangestuurd
vanuit OnKeyDown omdat het OS KeyDown auto-herhaalt maar slechts één
KeyUp per fysiek loslaten afgeeft.
Key in [VK_CONTROL, VK_SHIFT, VK_MENU] wanneer u ze wilt negeren.
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;