منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] تأخر ظهور الـ PictureBoxes عند تشغيل البرنامج - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] تأخر ظهور الـ PictureBoxes عند تشغيل البرنامج (/showthread.php?tid=37181)



تأخر ظهور الـ PictureBoxes عند تشغيل البرنامج - islam39 - 13-12-20

السلام عليكم،
قمت بعمل برنامج بإستخدام Windows Forms Application يحتوي على العديد من الـ PictureBoxes
وعند تشغيل البرنامج تتأخر الـ PictureBoxes عن الظهور لحوالي ربع ثانية وهذا يشوه المظهر
هل من حل لهذه المشكلة؟


RE: تأخر ظهور الـ PictureBoxes عند تشغيل البرنامج - Anas Mahmoud - 13-12-20

كم صورة تحديدا ، هل تقصد كم كبير جدا من مربعات الصور ؟ اذا كنت تقصد هذا فعلا فهذا طبيعي مع الويندوز فورم للاسف


RE: تأخر ظهور الـ PictureBoxes عند تشغيل البرنامج - asmarsou - 31-12-20

(13-12-20, 05:37 PM)islam39 كتب : السلام عليكم،
قمت بعمل برنامج بإستخدام Windows Forms Application يحتوي على العديد من الـ PictureBoxes
وعند تشغيل البرنامج تتأخر الـ PictureBoxes عن الظهور لحوالي ربع ثانية وهذا يشوه المظهر
هل من حل لهذه المشكلة؟

وعليكم السلام و رحمة الله
نعم يمكنك ذلك و ذلك بجعل الـ PictureBoxes تظهر في حدث فورم اون لوود
كنت قد صممت مشروع ولكن ب بوتنز وليس ببيكتر بوكسس
ولكن قمت بتغييره  ليتناسك مع مرادك بعض الشئ.... اليك الكود
كود:
Public Class Form1
    Dim numberOfPictureBoxes As Integer
    Dim PictureBoxes() As Button


    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Dim PictureBox1 = New PictureBox()
        Dim PictureBox2 = New PictureBox()
        Dim PictureBox3 = New PictureBox()
        
        PictureBox1.Location = New Point(20, 10)
        PictureBox1.Height = 25
        PictureBox1.Width = 30
         PictureBox1.Image = My.Resources._1
        PictureBox2.Location = New Point(20, 35)
        PictureBox2.Height = 25
        PictureBox2.Width = 30
        PictureBox2.Image = My.Resources._2
        PictureBox3.Location = New Point(20, 60)
        PictureBox3.Height = 25
        PictureBox3.Width = 30
        PictureBox3.Image = My.Resources._3
        
        
       



        ' Add the PictureBoxs to the Form.
        Controls.Add(PictureBox1)
        Controls.Add(PictureBox2)
        Controls.Add(PictureBox3)
        
       
    End Sub
End Class

ولك ان تعدل في خصائص البيكتر بوكسس كما ترغب و اختيار الصور التي تريد اظهارها من الريسورسز
والله الوفق

(31-12-20, 02:13 AM)asmarsou كتب :
(13-12-20, 05:37 PM)islam39 كتب : السلام عليكم،
قمت بعمل برنامج بإستخدام Windows Forms Application يحتوي على العديد من الـ PictureBoxes
وعند تشغيل البرنامج تتأخر الـ PictureBoxes عن الظهور لحوالي ربع ثانية وهذا يشوه المظهر
هل من حل لهذه المشكلة؟

وعليكم السلام و رحمة الله
نعم يمكنك ذلك و ذلك بجعل الـ PictureBoxes تظهر في حدث فورم اون لوود
كنت قد صممت مشروع ولكن ب بوتنز وليس ببيكتر بوكسس
ولكن قمت بتغييره  ليتناسك مع مرادك بعض الشئ.... اليك الكود
كود:
Public Class Form1
    Dim numberOfPictureBoxes As Integer
    Dim PictureBoxes() As Button


    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Dim PictureBox1 = New PictureBox()
        Dim PictureBox2 = New PictureBox()
        Dim PictureBox3 = New PictureBox()
        
        PictureBox1.Location = New Point(20, 10)
        PictureBox1.Height = 25
        PictureBox1.Width = 30
         PictureBox1.Image = My.Resources._1
        PictureBox2.Location = New Point(20, 35)
        PictureBox2.Height = 25
        PictureBox2.Width = 30
        PictureBox2.Image = My.Resources._2
        PictureBox3.Location = New Point(20, 60)
        PictureBox3.Height = 25
        PictureBox3.Width = 30
        PictureBox3.Image = My.Resources._3
        
        
       



        ' Add the PictureBoxs to the Form.
        Controls.Add(PictureBox1)
        Controls.Add(PictureBox2)
        Controls.Add(PictureBox3)
        
       
    End Sub
End Class

ولك ان تعدل في خصائص البيكتر بوكسس كما ترغب و اختيار الصور التي تريد اظهارها من الريسورسز
والله الوفق