منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب - [تم الحل][عنوان معدل] تحميل صور داخل PictureBox1

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

هذا شرح للمطلوب بالتفصيل
الهدف من المشروع وضع مؤقت واحد فقط بدل من وضع 5 أدوات مؤقت

ومن هنا حمل المشروع Rolleyes

http://vb4arb.com/vb/uploaded/425_11350021168.zip

تضيف الصور إلى البرنامج داخل الـ Resources

عن الضغط على أي زر تعطي البكجر بوكس الصورة المحددة
مثلا ضغطت على الزر الثاني ستعرض الصورة الثانية من الريسورس

Me.PictureBox1.Image=My.Resources._2.png
Timer1.Start

وعندما تمر ال5 ثواني داخل Timer1_Tick تكتب

Me.PictureBox1.Image=nothing

صعب ؟

أبو يعقوب لم افهم شي بصراحة من شرحك أنا ليست جديد على البرمجة :o

حمل المثال المرفق وضع الكود المطلوب ثم ارفع لنا المثال بعد وضع الكود

مع كامل الشكر لحضرتك

السلام عليكم ورحمة الله وبركاته
هذا هو الحل ان شاء الله

وممكن ان نقتبس من شرح الاخ[b]أبو يعقوب[/b]
ونعدل هذا الكود

كود :

[/b][/FONT][/SIZE][/COLOR]PictureBox1.Image = New Bitmap(PictureBox1.ClientSize.Height, PictureBox1.ClientSize.Width)[COLOR=#000080][SIZE=2][FONT=tahoma][b]

فنستبدله بهذا

كود :

[/b][/FONT][/SIZE][/COLOR]PictureBox1.Image = Nothing[COLOR=#000080][SIZE=2][FONT=tahoma][b]

استاذي المبدع مؤمن صباح الخير

جربت المثال نعم عمل الكود بدون اي خطأ ولله الحمد
بس انا اريد يفتح الصور من مسار مجلد تابع للمشروع بجنب المشروع لا اريد فتح الصور وهى مضافه إلى Resources
لو سمحت ممكن التعديل على المشروع حتى يشغل الصور من مسار مجلد الله يستر عليك Rolleyes

لك ما طلبت اخي الغالي
ستجد مجلد الصور pics بجانب ملف exe الخاص بالمشروع في هذا المسار WindowsApplication1\bin\Debug

اتمنى ان يكون هذا هو الحل المناسب لك اخي الكريم

أخي واستاذي مؤمن تحيه لك

تابع الصورة المتحركة التالية

شاهد الصورة بدقة تجد عند الضغط على مثلاً زر عرض الصورة رقم 1 سيبدأ عرض الصورة لمدة 5 ثواني وهذا تمام لا يوجد فيه اي مشكلة

بس عندما اضغط على زر عرض الصورة رقم 2 مباشرة بعد الضغط على عرض الصورة رقم 1 يقوم الكود بعرض الصورة رقم 2 ويعرضها لمدة 4 ثواني فقط وعندما اضغط على زر عرض الصورة رقم 3 بعد الضغط على زر عرض الصورة رقم 1 و2 مباشرة
سيعرض الصورة رقم 3 لمدة ثلاثة ثواني فقط تخيل الصورة رقم 5 بكذا لن تعرض لمدة خمس ثواني ستعرض لمدة ثانية واحده فقط ؟
وشاهد الصورة المرفقه

كيف يمكن جعل الخمس الثواني تبدأ بعد الضغط على اخر زر لعرض الصورة المطلوبة ؟
:confused:

اليك الحل

قم بتعديل هذا الكود

كود :

[color=#000080][SIZE=2][FONT=tahoma][b]Private Sub img(ByVal path)[/b][/FONT][/SIZE][/color]

[color=#000080][SIZE=2][FONT=tahoma][b]        PictureBox1.Load(pics_path & path)[/b][/FONT][/SIZE][/color]

[color=#000080][SIZE=2][FONT=tahoma][b]        Timer1.Enabled = True[/b][/FONT][/SIZE][/color]

[COLOR=#000080][SIZE=2][FONT=tahoma][b]    End Sub

[/b][/FONT][/SIZE][/COLOR]

استبدله بهذا

كود :

[color=#000080][SIZE=2][FONT=tahoma][b]Private Sub img(ByVal path)[/b][/FONT][/SIZE][/color]

[color=#000080][SIZE=2][FONT=tahoma][b]        Timer1.Enabled = False[/b][/FONT][/SIZE][/color]

[color=#000080][SIZE=2][FONT=tahoma][b]        PictureBox1.Load(pics_path & path)[/b][/FONT][/SIZE][/color]

[color=#000080][SIZE=2][FONT=tahoma][b]        Timer1.Enabled = True[/b][/FONT][/SIZE][/color]

[color=#000080][SIZE=2][FONT=tahoma][b]    End Sub[/b][/FONT][/SIZE][/color]

اتمنى ان يكون هذا الحل المناسب لك ان شاء الله

يا سلام عليك يا استاذ مؤمن نعم بكذا الكود 100%

بارك الله فيك

بالتوفيق اخي الكريم
تحياتي لك

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

محترف البرمجة اوي

أبو يعقوب

محترف البرمجة اوي

RaggiTech

محترف البرمجة اوي

RaggiTech

محترف البرمجة اوي

RaggiTech

محترف البرمجة اوي

RaggiTech