دروس الفسجوال بيزك: الدرس السادس و السابع:

الدرس السادس : القوائــــب :

و لكن كيف ننشأها:

.القوائم العلوية الظاهرة : اذهب إلى قائمة tools ثم خذ menu editor
الآن سيظهر لك نافذة صغيرة منها سننشأ القوائم في السطر الأول
caption : ضع الاسم الذي تريده أن يظهر في بformهذه القائمة رئيسية مثل file أو edit و ليكن file
في السطر الثاني
name: ضع قبل كل شي العبارة mnu وهي عبارة دائمة هنا ولا يستغني عنها وإلا سوف يحدث خطأ في ولن يقبلها ثم ضع أي اسم لأنه لن يظهر ولكن سيتعامل معه الvb مثل أي خاصية name.
و الآن اضغط ok علما بأنه لة أغلقت ال menu editro دون أن تضغط ok لن يحفظ التغييرات
و الآن ستجد القائمة file
و الآن كيف ستنجعل القائمة تنبثق عنها قوائم أخرى؟؟
إذهي مرة أخرى إلى الmenu editorا وستجد القائمة محفوظة
الآن اضغط زر اسمه next في الأسفل وستظهر حينها مكان لمعطيات قائمة جديدة أدخل المعطيات بالطريقة نفسها لfile و لاتنسى الmnu في السطر الثاني
والآن لو ضغطت ok ستجد بأن هناك قائمة جديدة ولتكن قد سميتها
en ولكن نحن نريدها أن تكون تابعة لfile
عد إلى menu editor وستجد بجانب زر next أسهم للأعلى و الأسفل و اليمين و اليسار الآن حدد القائمة en التي تريد أن تكون تابعة لfile واضغط السهم نحو اليمين وستجد في المربع الأبيض الكبير الذي يبن البنية الشجرية للقوائم بأن القائمةen قد أصيحت مسبوقة بأربع نقاط و الآن نكون قد أتممنا المهمة اضغط ok وستجد بأنهenأصبحت تابعة ل
file وهكذا ....
و إذا أردت أن تنشأ قائمة فرعيةعن أحد القوائم الفرعية مثل قائمة اسمهاmhdh تكون تابعة للقائمة الفرعية en اتبع نفس الطريقة فأنشىء قائمة جديدة تحت الen و لاتنسى الMnu ثم اضغط على السهم نحو اليمين الآن إذا اكتفيت بهذا ستصبح القائمة mhdh تحت القائمة en وتابعة ل file ولكن اذهب إلى menu editor مرة أخرى وعين الmhdh ثم اضغط مرة أخرى على السهم نحو اليمين وستجد أن عدد النقاط أمامها قد زاد و أصبح 8 وعندهاتكون قد أصبحت تابعة للقائمة en أغلق ال menu editor و لاتنسى ضغط Ok ثم ستجد في القائمة en سهم يوصل للقائمة mhdh وهو ما نريده ....
والآن إذا أردت أن تعيد القائمة mhdh كما كانت غير تابعة ل en بل تابعة ل file افتح ال meny editor وحدد mhdh ثم اضغط على السهم اليسار ستجد عددالنقا قد قل و أصبح 4 اضغط ok ستجدها عادت كما كانت و إذا ضغط على السهم اليسار مرتين ستذهب كل النقاط أمام الmhdh وتصبح قائمة رئيسية مثل file و هكذا أضيفوا ما تريدون من القوائم
والآن كيف نعطي القوائم أوامر مثل ال command أو غيره ...
عندما تكون في وضع تصميم الفورم تلا حظ بأن القوائم التي أضفتها يمكن
أنزالها قبل أن تضغط f5 لتجريب البرنامج الآن أنزل القائمة التي تريد وأضغط على أي قائمة تابعة لها مثل en ستجد بأن نافذة الكود قد ظهرت: ضع فيها الكود مثلا :
كود:
Form1.BackColor = &H80000009

و هو تغيير لون الفوم للون الأسود ....
شغل البرنامج و اضغط على en و ستجد بأنها قد نفذت الكود مثل أي عنصر...
وهكذا ...
2.القوائم اليسارية المخفية:
إذا أردنا أن نضع قوائم عند الضغط على الزر اليمين اتبع ما سبق و لكن
أولا أنشىء قائمة رئيسة مثل file وسمها tt وضع تحتها القوئام التي تريدها على أن تمون كلها تابعة لtt مع العلم أنه في القوائم هذه التي تظهر باليمين لا تضع في السطر الثاني name ةىع بل ضع الاسم الذي تريد ...
و الآن بعد أن انتهيت من إعداد قائمتك اليمينية اذهب للقائمة الرئيسية لها وهب tt ستجدو أزل إشارة الصح عن صندوق الاختيار visible و هو يقع فوق مربع القوائم وذلك لجعل القائمة tt مخفية...
والآن أهم شي ضع الكود التالي في الفورم و في الحدث
mose down ولا تنسى ذلك ...
كود:
If Button = 2 Then
Form1.PopupMenu tt
End If
هذا الكود لإظهار القوائم التي أخفيناها من الخاصية VISIBLE
والآن كيف نستطيع أن نعطيها أوامر ونحن لا نراها مثل القوائم الظاهرة
ليست مشكلة .. اذهب إلى نافذة الكود في الFORM التي وضعت القوائم المخفية بها و ستجد بالقائمة التي تقع أعلى و يسار النافذة والتي يمكن إسدالها الآن أسدلها و ستجد بأن القوائم المخفية التي
أضفتها موجودة ولكن بالأسماء التي كتبتها في السطر الثاني و هو سطر الNAME و ليس ال CAPTION ...و الآن اضغط على أي اسم منها وستجد أنه وضع سطري الكود الخاصين به هنا ضع الكود وشغل البرنامج و اضغط بالزر اليمين و ستجد أن القائمة قد ظهرت و اضغط على أي اسم منها أعطيته أمر وليكن:
كود:
END
عنها سينفذ الأمر وينهي البرنامج و هكذا......
ملاحظات ضرورية:

1. إذا أردت و ضع خط ذو لون خافت بين عناصر القائمة مثل أي برنامج
اتبع ما سبق من جيث تصميم قائمة تابعة للقائمة file ولكن ضع في السطر CAPTION الرمز (-) و ضعه دون القوسين
أما في السطر NAME فضع الاسم line وأذا أردت إضافة خط آخر ضع
في السطر name بدلا من Line ضع Line 1 وهكذا بالترقيم و ضع الخط بين أي عنصرين وشغل البرنامج ستجد الخط....
2.إذا أردت أن يظهر خط تحت حرف من القائمة file مثلا بحيث أنه إذا
ضغطت alt يظهر هذا الخط و إذا ضغطت من لوحة المفاتيح على هذا الحرف فإن القائمة file تنزل ضع في السطر CAPTION
بدلا من file ضع file& أي يجب أن تسبق الكلمة ب الرمز(&) وليس من الضروري في أول الكلمة ممكن بالشكل f&ile و هكذا ...
3.إذا أردت وضع اختصار لعنصر معين من القائمة إي عند الضغط عليه من لوحة المفاتيح يفعل الأمر ستجد في الMENU EDITOR
قائمة يمكن إنزالها و اسمها (SHORT CUT) عندما تضغط على
أحد عناصرالقائمة لتعلمه ستجد أنه في قائمة الSHORT CUT
الرمز (NON) أيلا يوجد اختصار والآن لتضع للعنصر الذي علمته اختصار أنزل هذه القائمة بعد تعليم أحد العناصر و اختر أحد الاختصارات الموجودة
ثم اضغط ok للخروج و حفظ التغييرات و ستجد بأنه عنما تضغط على
الزر نفسه من لوحة المفاتيح يقوم بتنفيذ الأمر و إذا أسدلت القائمة في البرنامج ستجد أن الاختصار قد كتب إلى جانبه...
3.إذا أردت أن تظهر إشارة صح أو (check) إلى جانب القائنة الفرعية ستجد عند تحديد القائمة من
MENU EDITOR بأن هناك مربع أختيار صغير إلى جانب ENABLE هو CHECKED
ضع إشارة صح بالمربع و جرب البرنامج ستجدها
كما يمكن إزالى الإشارة عن القائمة MHDH مثلا و ووضعها عند القائمة EN وذلك بوضع الكو د
كود:
mnuen.Checked = True
mnumhdh.Checked = False
وشكرا ...


الدرس 7 : ملفات الocx و التعامل معها

أولا ما هي ملفات الOCX?
ببساطة إن ملف الocx الذي يشبه ملف الDll هو ليس إلا هذه الأداة التي تأخها من صندوق الأدوات Tool Box ثم تقوم برسمها على الفورم بالحجم و الشكل الذي تريده و اللون و الاسم و ....و كل خاصية أو حدث كلها تكون مبرمجة و جاهزة للاستعمال في ملف الocx الذي يوجد عدد كبير منها في مجلد الSystem..
و لنأخذ هذه المقدمة عنها
تقنية OCX - وبداية ظهور Activex :
إن ثورة التقنيات لـMicrosoft Visual Basic بدأت مع الإصدار الأول وأخذت تنموا بالتدريج حتى كانت الثورة الثانية في الإصدار الرابع حيث في هذا الإصدار تم تغير محركEngine (وهوا الملف الذي يدعم البرامج أثناء تشغيلها ويسمى VVBRUN والذي كان مبني على تقنية 16-Bit ويعرف باسم Ruby والذي قام بابتكاره (الآن كوبر ) الأب الروحي لـ Visual basic) وفي بداية ظهور تقنية 32-Bit (Windows95 & WindowsNt) قامت Microsoft ببناء محرك جديد أسمته Object Basic والذي يعرف الآن باسم VBA وكان أهم ما في هذا المحرك هوا دعمه لتقنية COM .
وكان مع الإصدار الرابع على مطوري Visual basic دعم أدوات التحكم الخاصة Custom Controls ولم تكن VBX صالحة لذلك لا شكلاً ولا مضمونا , وكان البديل لذلك هوا دعم هذه الأدوات عن طريق تقينه OLE 2 ولكن لم تفي تقنية OLE 2 باحتياجات Visual basic لذلك تم تطوير OLE في صورة ابتكار أداة تحكم قائمة على OLE سميت (ocx)

ومع تتطور أنظمة التشغيل التي تعمل على تقنية 32-Bit وانتشارها , ومع ظهور لغات برمجة الانترنت المختلفة , قامت Microsoft بتغير هندسة تقنية ocx لتصبح صالحة للاستخدام على الشبكات وبخاصة شبكة الانترنت وقد قامت الشركة أيضاُ بتغير اسم التقنية من OLE والتي بنيت عليها ocx إلىActiveX .
ومن هنا بدأت الثورة الحقيقة لمبرمجين Visual Basic وهي إتاحة تطوير الأدوات Activex لتكون أسهل الطرق لإنتاج كائنات جديدة أو برمجة صفحات الويب بواسطة هذه التقنية .
وبعد هذه المقدمة...دعونا نتعرف أكثر عليها أنت حتى الآن من خلال الدروس السابقة لم تتعامل إلى مع عدد قليل منها Text و Labelو Picture و غيرها ..و لكن ما رأيك أن الفيجوال يملك عناصر أكثر من هذه التي تراها أضعاف مضاعفة و ألأكثر احترافية ...( ستتعرفون على قوة الفيجوال الحقيقية في برمجة الألعاب)..
الآن لا بد أن ذلك أثار حيرتكم أين هذه العناصر إذا ...هيا معا كي نتعرف عليها ان تختبأ..
اذهب لقائمة العناصر Tool Box و انقر بالزر اليمين للفأرة ..(انقر خارج العناصر في المساحة الفارغة).
و الآن لاحظ قد ظهرت لك قائمة بثلاثة عناصر اختر الاول المسمى ب Components أي عناصر أو أجزاء.
و لاحظ النافذة التي ظهرت ..نعم إنها نافذة العناصر و كل ما تراه من العناصر الموجودة في القامئة البيضاء أمامك هي عناصر أو ملفات Ocx اختر أحدها و ذلك بتفعيل إشارة صح إلى جانبه ثم OK و لا حظ انه عند اخيارك أي عنصر ستلاحظ امسه وموقعه في الFrame تحت الآن اختر أحدها ثم OK و لاحظ صندوق العناصر Tool Box لقد زاد عدد العناصر و احد أو ربما اكثر (حسب الأداة)..على كل حتى الآن لن تتعاملوا مع هذه العناصر لأنها متقدمة قليلا مثل ال Common Dialog المسؤول عن فتح الملفات الخارجية مثل الصور و الاصوات .
و لكن ما ذا لو أردنا مستقبلا التعامل مع ملفات الOcx التي نستوردها من الخارج ...مثلا ربما تجد اداة في أحد المواقع تقوم بتحميلها و تريد استعمالها الآن سنتعلم كيف سنستوردها ...
عد للنافذة Components ثم بدل أن تختار عنصر ما من القائمة البيضاء أمامكم اختر Browse..
بعدها حدد موقع الأداة في جهازك ثم OPEN..عندها ستجد الأداة و قد اصبح اسمها في القامئة ثم اختر OK و ستجد الأداة في Tool Box ...
و أدوات الOcx على الرغم من صعوبة برمجتها أو بالأحرى تطويرها لكن يوجد عدد كبير من الأدوات التي صممها أشخاص عرب و أنا شخصيا قد صممت عدد من الأدوات مثل أداة شريط ال Xp الجانبي و أداة ال Suoper Label ولو كان الوقت مناسبا لقمت بإضافتها للموقع..
و شكرا