01-06-2010, 10:46 AM
01-06-2010, 01:15 PM
السلام عليكم ورحمة الله
أكتب في أحد الأحداث OnKeyDown أو OnKeyUp للنموذج TForm شيء مثل:
ولا تنسى قبل ذلك أن تضبط KeyPreview على True
---
أفضل من ذلك استخدم المكون TActionList قم بإنشاء بعض الأحداث باستخدامه (Actions)
ثم حدد لكل حدث ShortCut الذي تريد
اربط الحدث (Action) مع أي مكون من الخاصية Action.
بالتوفيق.
أكتب في أحد الأحداث OnKeyDown أو OnKeyUp للنموذج TForm شيء مثل:
كود :
if Key = VK_F1 then
//...whatever---
أفضل من ذلك استخدم المكون TActionList قم بإنشاء بعض الأحداث باستخدامه (Actions)
ثم حدد لكل حدث ShortCut الذي تريد
اربط الحدث (Action) مع أي مكون من الخاصية Action.
بالتوفيق.