مرفق بهذا الموضوع، نموذج Form1.vb.. ولكنّي غيّرت امتداده إلى rar.. فأرجو إعادة أمتداده إلى vb أولا..
ويمكنك إنشاء مشروع جديد، وإضافة هذا النموذج له، بضغط الاختصار Ctrl+D من لوحة المفاتيح، واختيار الموضع الذي حفظت فيه هذا النموذج..
ولا تنس أن تجعل هذا النموذج نموذج بدء التشغيل، بضغط قائمة Project واختيار الأمر Set As Start Up Object، بينما النموذج محدّد في متصفّح المشاريع Solution Explorer.
وسيريك هذا المشروع، كيفيّة تظليل سطح النموذج بتشكيلات رائعة، تمنحها لك فرشاة التظليل HatchBrush، وهي تملأ الشكل (النموذج في حالتنا هذه) بتشكيلة معيّنة، من أكثر من 50 تشكيلة جاهزة، يمكنك اختيارها من خلال المرقّم HatchStyle.. ويتمّ تعريف هذه الفرشاة كما يلي:
Dim hBrush As Drawing.Drawing2D.HatchBrush
HBrush = New HatchBrush (طراز الفرشاة, لون خطوط التظليل, لون الخلفيّة)
وهذه بعض تشكيلات التظليل، التي يمكنك استخدامها كقيم للمعامل الأوّل:
ForwardDiagonal خطوط قطريّة من أعلى اليسار إلى أسفل اليمين.
BackwardDiagonal خطوط قطريّة من أعلى اليمين إلى أسفل اليسار.
Cross خطوط أفقيّة ورأسيّة متقاطعة.
DiagonalCross خطوط قطريّة متقاطعة.
Horizontal خطوط أفقيّة.
Vertical خطوط رأسيّة.
ويمكنك استعراض هذه التشكيلات المختلفة، في تطبيق مشروعنا، حيث سيتمّ تغيير تظليل النموذج في كلّ مرّة تضغط فيها الزرّ.
لمزيد من المعلومات عن الرسم والتلوين، راجع الفصل 12 في كتاب احتراف فيجيوال بيزيك دوت نت:
مع ملاحظة أنّ هذا المثال حديث، ولم تتمّ إضافته بعد للكتاب.
أرجو أن تستفيدوا منه.