• 0
AbDoU-VB

إستفسار بخصوص MDI Form

سؤال

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

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

أهلاً اخواني

أعمل حالياً على برمجة برنامج للتعديل على الصور مثل الفوتوشوب والفوتفلتر !

ولم يسبق لي التعامل مع Mdi Form من قبل للأسف :(

لكن الحمد لله بحثت في النت ووجدت عدة دروس لإنشاءها ، لكن لم اجد دروس للتعامل معها

المهم قمت بإنشاء فورم يتمثل في Form Parent ، وفورم آخر يتمثل في Form Child

ووضعت كود إنشاء الفورمات ، وكود لتسميتها والتعديل على عنوانها حسب عددها

يعني !

Window 1

Window 2

Window 3

حسب عدد النوافذ المنشأة

المهم هذه النوافذ تحتوي على PictureBox ، عرفت كيفية إيجاد النافذة المفعلة عبر :

Me.ActiveFormChild

المشكل الآن هو أني اريد أن يظهر في الـ PictureBox في الفورم المفعل ، الصورة التي أفتحها عبر OpenFileDialog

هل من مساعد جزاكم الله خيراً ؟

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

4 إجابة على هذا السؤال .

  • 0

Me.PictureBox1.Image = New System.Drawing.Bitmap(OpenFileDialog.FileName)

و لكن ما علاقة الصورة بالـ MDI؟

هل يتم استدعاء الـ OpenFileDialog من فورم آخر؟

تم تعديل بواسطه byte101
0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

الـ OpenFileDialog يتم إستدعائها من الفورم الأب ، ليتم تحديد الصورة المراد فتحها

فتفتح في Mdi Form جديدة

مثل الفوتوفلتر

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

جزاكم الله خيراً إخواني تم حل المشكل والحمد لله بعد بحث طويل بالأنترنت

OpenFileDialog1.ShowDialog()
Dim img_path = OpenFileDialog1.FileName

If Me.ActiveMdiChild Is Nothing Then
MsgBox("Select a Control Plz")
Exit Sub
End If
Dim a As String = Me.ActiveMdiChild.ActiveControl.GetType().ToString
If a = "System.Windows.Forms.PictureBox" Then
CType(Me.ActiveMdiChild.ActiveControl, System.Windows.Forms.PictureBox).Load(img_path)
End If

وفي الفورم الإبن وضعت الكود التالي :

Me.ActiveControl = PictureBox1

جزاكم الله خيراً

1

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اسهل طريقة هي كمايلي :

اذهب الى الفورم ثم الى خصائص الصورة PictureBox1 حيث ستجد خاصية اسمها modifiers اجعلها Public .

لفتح الصورة استخدم


Me.ActiveFormChild.PictureBox1.Load(OpenFileDialog.FileName)

2

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان

  • يستعرض القسم حالياً   0 members

    لا يوجد أعضاء مسجلين يشاهدون هذه الصفحة .