تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
تأثيرات احتراااااافية على البرنامج تمنحه منظر احترافي -أدخل وادعيلي-
#1
كاتب الموضوع : محمد عوض السقا


بسم الله الرحمن الرحيم

إخواني وأنا أتصفح موقع أجنبي لقيت عدة تأثيرات رائعة جدا لتعملها على برنامج لم تكن لتتصور أنه يمكن عملها بالفيجوال بيسك ولكني رأيت أن أكتبها في المنتدى لأن معظم الأعضاء -وأنا منهم - لا يعول على المنظر العام للبرنامج بشكل كبير مع أنه ما يجذب المستخدم لبرنامجك.

أولا تأثير Fade أو التلاشي :
يمكن تطبيقه على دوت نت 2008 فقط


كود :
[color=#000000][COLOR=#0000bb][/color][color=#007700]For [/color][color=#0000bb]Fade [/color][color=#007700]= [/color][COLOR=#0000bb]0.0 To 1.1 Step 0.1
            Me[/COLOR][color=#007700].[/color][color=#0000bb]Opacity [/color][color=#007700]= [/color][COLOR=#0000bb]Fade
            Me[/COLOR][color=#007700].[/color][color=#0000bb]Refresh[/color][COLOR=#007700]()
            [/COLOR][color=#0000bb]Threading[/color][color=#007700].[/color][color=#0000bb]Thread[/color][color=#007700].[/color][color=#0000bb]Sleep[/color][color=#007700]([/color][color=#0000bb]100[/color][COLOR=#007700])
        [/COLOR][COLOR=#0000bb]Next  
[/COLOR][/COLOR]

والكود ده ممكن تحطه في حدث Form_Load وسترى النتيجة
أما عكسه وعندما تريد وضعه في حدث الانهاء فاكتب الكود التالي:

كود :
[color=#000000][COLOR=#0000bb][/color][color=#007700]For [/color][color=#0000bb]Fade [/color][color=#007700]= [/color][color=#0000bb]1.1 To 0.0 Step [/color][color=#007700]-[/color][COLOR=#0000bb]0.1
                Me[/COLOR][color=#007700].[/color][color=#0000bb]Opacity [/color][color=#007700]= [/color][COLOR=#0000bb]Fade
                Me[/COLOR][color=#007700].[/color][color=#0000bb]Refresh[/color][COLOR=#007700]()
                [/COLOR][color=#0000bb]Threading[/color][color=#007700].[/color][color=#0000bb]Thread[/color][color=#007700].[/color][color=#0000bb]Sleep[/color][color=#007700]([/color][color=#0000bb]100[/color][COLOR=#007700])
            [/COLOR][COLOR=#0000bb]Next  
[/COLOR][/COLOR]

ولكن لاحظ أنك عند اختفاء الفورم فهذا لا يعني أنه قد تم اغلاقه لذا يجب عليك أمر الانهاء في آخر الاجراء.
------------------------------------------------------------------------------------------------------

ثانيا تأثير السحب للفورم (يمكن تطبيقه في أي اصدار من الفيجوال بيسك حتى 6 ).

السحب للخارج:

كود :
[color=#000000][COLOR=#0000bb][/color][color=#007700]Do [/color][color=#0000bb]Until Me[/color][color=#007700].[/color][color=#0000bb]Height [/color][color=#007700]> [/color][COLOR=#0000bb]500
            Me[/COLOR][color=#007700].[/color][color=#0000bb]Height [/color][color=#007700]= [/color][color=#0000bb]Me[/color][color=#007700].[/color][color=#0000bb]Height [/color][color=#007700]+ [/color][COLOR=#0000bb]1
            Me[/COLOR][color=#007700].[/color][color=#0000bb]Refresh[/color][COLOR=#007700]()
        [/COLOR][COLOR=#0000bb]Loop  
[/COLOR][/COLOR]

ولعكس الاجراء للسحب للداخل:

كود :
[color=#000000][COLOR=#0000bb] [/color][color=#007700]Do [/color][color=#0000bb]Until Me[/color][color=#007700].[/color][color=#0000bb]Height [/color][color=#007700]< [/color][COLOR=#0000bb]100
            Me[/COLOR][color=#007700].[/color][color=#0000bb]Height [/color][color=#007700]= [/color][color=#0000bb]Me[/color][color=#007700].[/color][color=#0000bb]Height [/color][color=#007700]- [/color][COLOR=#0000bb]1
            Me[/COLOR][color=#007700].[/color][color=#0000bb]Refresh[/color][COLOR=#007700]()
        [/COLOR][COLOR=#0000bb]Loop  
[/COLOR][/COLOR]

لاحظ يمكنك تطبيق نفس الاجراءات على عرض الفورم بتبديل me.height الى me.width ومراعاة موقع الفورم للشاشة.


سبحان الله وبحمده سبحان الله العظيم
}}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  طريق تحزيم البرنامج بوسطة الفيجوال RaggiTech 0 444 09-10-12, 06:17 PM
آخر رد: RaggiTech

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم