هل تشعر أن القائمة التي تقدمها دلفي غير جذابة حقًا للاستخدام؟ يمكنك استخدام تحكم VCL الخاص بـ Delphi لتنفيذ قائمة نمط IE! تتضمن الميزات: الأزرار العائمة، وتحديد موضع السحب، والرسومات... وكلها لا تتطلب أي عناصر تحكم من طرف ثالث أو الكثير من البرمجة!
يتطلب تنفيذ قائمة نمط IE الخطوات التالية:
1. تحديد قائمة عادية بالطريقة العادية؛
2. إخفاء القائمة المحددة من النافذة؛
3. أضف CoolBar وToolBar إلى النافذة كشريط القوائم؛
4. قم بتعيين القائمة على زر شريط الأدوات؛
5. برنامج المؤثرات الخاصة (اختياري).
الخطوة الأولى هي تحديد القائمة العادية بالطريقة العادية.
قم بإضافة عنصر تحكم TMainMenu إلى النافذة، ثم قم بتعريف عناصر القائمة والأيقونات ومفاتيح الاختصار وما إلى ذلك بالطريقة المعتادة.
الخطوة الثانية هي إخفاء القائمة المحددة من النافذة.
سيتم عرض القائمة المحددة تلقائيًا على النافذة. وذلك لأنه عند إضافة عنصر تحكم TMainMenu إلى النافذة، يتم تعيين خاصية القائمة الخاصة بكائن TForm تلقائيًا إلى كائن TMainMenu المضاف. من أجل استخدام القائمة المحددة لدينا، يجب أن تكون هذه القائمة مخفية. قم بمسح TForm.Menu ولن يتم عرض القائمة المحددة تلقائيًا.
الخطوة الثالثة هي إضافة CoolBar وToolBar إلى النافذة كشريط القائمة.
قم بإضافة عنصر تحكم TCoolBar إلى الإطار، ثم قم بوضع عنصر تحكم TToolBar بداخله. قم بتعيين الخاصية AutoSize الخاصة بـ TCoolBar وTToolBar إلى True، وقم بتعيين الخاصية Flat الخاصة بـ TToolBar إلى True، وقم بتعيين الخاصية ShowCaptions الخاصة بـ TToolBar إلى True. بهذه الطريقة، يظهر شريط قوائم فارغ أعلى النافذة. بعد ذلك، سنضيف عناصر القائمة إلى شريط القائمة هذا.
الخطوة الرابعة هي تعيين القائمة إلى زر شريط الأدوات.
انقر بزر الماوس الأيمن فوق TToolBar وحدد زر جديد من القائمة المنبثقة لإضافة الزر الأول إلى شريط القائمة. قم بتعيين الخاصية AutoSize والخاصية Grouped لهذا الزر إلى True، ثم قم بتغيير خاصية Caption إلى نص عنصر القائمة. على سبيل المثال، يمكن تعيين خاصية التسمية التوضيحية إلى &ملف. وأخيرًا، قم بتعيين خاصية MenuItem لهذا الزر على عنصر القائمة المقابل المحدد في TMainMenu. على سبيل المثال، قد يتم تعيين الخاصية MenuItem إلى mnuFile. بعد هذه الإعدادات، يتم ربط الزر بعنصر القائمة، وستظهر القائمة المقابلة عند النقر فوق الزر.
الخطوة الخامسة هي برمجة المؤثرات الخاصة (اختياري).
بعد الخطوات الأربع السابقة، يمكن أن تعمل القائمة الجديدة بشكل طبيعي بالفعل. ومع ذلك، إذا كنت تريد تنفيذ تأثيرات خاصة أخرى، مثل سحب CoolBar وتحديد موضعه، فأنت بحاجة إلى القيام ببعض أعمال البرمجة الإضافية. لم تعد هذه المحتويات موضوع هذه المقالة ولن تتم مناقشتها. يمكن للقراء المهتمين الرجوع إلى مساعدة دلفي.
القراء مدعوون لتقديم آرائهم الخاصة حول هذه المقالة.