تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
عرض صوره من مجلد ?
#1
السلام عليكم 
عندي مجلد مليئ بالصور 
وحاب اعمل حلقه لوب تحمل الصوره في اداة الصور 
كل خمس ثواني 
ممكن الكود
الرد }}}
تم الشكر بواسطة:
#2
أولا ضع أداة بكتشر بوكس ثم أداة تايمر ضع خاصية
Interval=5000
ثم ضع الكود التالي :

كود :
 Dim ListBox2 As New ListBox
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    For Each img In System.IO.Directory.GetFiles("D:\Image", "*.png", IO.SearchOption.AllDirectories)
        ListBox2.Items.Add(img)
    Next
    Timer1.Start()
End Sub
Dim s As Integer
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
    If s = ListBox2.Items.Count - 1 Then
         s = 0
         Exit Sub
    End If
    PictureBox1.Load(ListBox2.Items(s).ToString)
    s += 1
End Sub
الرد }}}
تم الشكر بواسطة: elgokr , DOX.1 , DOX.1
#3
جميييل جداً 
الطريقه هاذي ترفع البرسسور
الرد }}}
تم الشكر بواسطة:
#4
في بداية تشغيل البرنامج عند تحميل أسماء الملفات الى الليست بوكس الوهمية ثم تعمل بشكل عادي حتى عند تحميل البرنامج يستخدم 4% من المعالج و 20 الى 26 ميغا من الرامات .
جربه ببرنامج مستقل للتتأكد .
الرد }}}
تم الشكر بواسطة: elgokr , DOX.1 , DOX.1


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كيف اقارن صوره بصوره أخرى menanaeem 2 597 07-11-22, 05:24 PM
آخر رد: menanaeem
  [سؤال] كيفية حفظ عناصر في مجلد بحسب ترتيبها في الليست بوكس asmarsou 1 625 13-07-22, 06:42 PM
آخر رد: ابراهيم ايبو
  [VB.NET] رفع مجلد ابو جمال 0 448 13-06-22, 03:30 PM
آخر رد: ابو جمال
  [سؤال] كيف نحفظ pdf داخل مجلد في الديباغ محمد الزينتا 1 858 16-01-22, 10:11 PM
آخر رد: aljzazy
Photo مشكلة حفظ الصور في مجلد cordava 3 1,298 18-12-21, 10:07 PM
آخر رد: ابراهيم ايبو
  تشغيل برنامج موجود في مجلد programmes file i1982 1 984 15-12-21, 02:16 AM
آخر رد: ابو انس
  اريد طريقة لاتقاط سكرين شوت وحفظها تلقائي في مجلد من ملفات برنامجي 4545Mohamed 2 1,473 08-07-21, 01:00 PM
آخر رد: 4545Mohamed
  [سؤال] اضافة صوره من مجلد الى كرستال ريبورت alhoraibi800 3 1,958 02-07-21, 11:56 AM
آخر رد: Lathe1
  [سؤال] تمرير صوره من الفورم الى كرستال ريبورت alhoraibi800 1 1,272 30-06-21, 09:42 PM
آخر رد: ابراهيم ايبو
  مشكله فى حفظ صوره بقاعده بيانات اكسس خالد كامل1 1 1,252 22-06-21, 12:03 AM
آخر رد: ابراهيم ايبو

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


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