property OnKeyUp: TKeyEvent;
OnKeyUp هو حدث لوح المفاتيح القياسي في VCL منشور على TPdfView. ويعمل المعالج بعد أن يبلّغ نظام التشغيل عن رسالة WM_KEYUP /
WM_SYSKEYUP بينما أداة التحكم تحمل التركيز. وتوقيع الحدث هو
procedure(Sender: TObject; var Key: Word; Shift: TShiftState) —
حيث Key هو رمز المفتاح الافتراضي (VK_ESCAPE و
VK_NEXT وVK_PRIOR و…) بينما يبلّغ Shift عن حالة المفاتيح المعدِّلة لحظة الإفلات
يُطلق OnKeyUp لكل مفتاح — بما في ذلك المفاتيح غير المحرفة مثل أسهم الاتجاهات ومفاتيح الوظائف — ما دام TPdfView يملك تركيز لوح المفاتيح. واضبط
Key على صفر داخل المعالج لستهلاك الحدث فلا ينتقل أبعد (مثلًا لمنع Tab من تدوير التركيز أثناء تحرير حقل نموذج)
استخدم OnKeyUp لتنفيذ اختصارات العارض التي يجب أن تُطلق عند الإفلات لا أثناء الاستمرار — مثل Page Down / Page Up للتنقل و F3 للبحث عن التالي و Escape لإلغاء تحديد. أما التفاعلات المستمرة (التحريك، التحديد بالمستطيل) فالأفضل قيادتها من
OnKeyDown، لأن نظام التشغيل يكرر KeyDown تلقائيًا لكنه يبث KeyUp مرة واحدة فقط لكل إفلات فعلي
Key in [VK_CONTROL, VK_SHIFT, VK_MENU] إذا أردت تجاهلها
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;