الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كيف أتحكم في النموذج الأب

مغلق
بدأه ossama_au في 5 أبريل 2005 · 4 رد · 924 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

الأخوة الأعزاء

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

لدي مشكة منذ التحويل الي فيجول بيسك دت نت مع النماذج الفرعية والنموذج الأب لهم

علي سبيل المثال لدي 4 نماذج في البرناج

النموذج الأول - هو النموذج الأب mdiparent

النموذج الثاني-يعتبر نموذج عام داخل النموذج الأب وعلية زرين

الزر الأول به أمر يفتح النموذج الثالث

الزر الثاني به أمر يفتح النموذج الرابع

ليس لديه أي مشكلة في أول خطوتين (وهي تعريف النموذج الأب والنموذج العام)

ولكن كل المشكلة في كيفية فتح النموذج الثالث أو الرابع

حيث يتم في فتح النموذج بعيدا عن النموذج الأب وليس جزءا منه.

ولكم التحية

#2

سلام عليكم

في النموذج الاب اكتب :

Me.IsMdiContainer = True

او من خصائص الفورم الاب سوف تجد خاصية IsMdiContainer

وعند انشاء النموذج الفرعي :

Dim frmChild As New frmchild   'Create child form
 frmChild.MdiParent = Me ' set this as parent form
frmChild.Show()

" اللهم لاسهل إلا ماجعلته سهلاً وأنت تجعل الحزن إذا شئت سهلاً "

003.gif

قواعد طرح الأسئله والمشاركات

-------------------

MSN Messenger : nontop@gmail.com

Happy coding

-------------------

#3

الأخ العزيز

أشكرك علي ردك السريع

ولكن لديا تعليق

علي مايبدو أني لم أكن واضح في المثال الذي طرحتة

المطلوب أن أكتب كود علي الزر الأول في النموذج الثاني يفتح النموذج الثالث الفرعي

وأيضا كود علي الزر الثاني يفتح النموذج الرابع

ولك التحية

#4

الأخوة الأحباء

بعد عدة محاولات أظن أني عرفت الأجابة علي السؤال الخاص بالنماذج الفرعية والنماذج الرئيسية

في المثال السابق

كان المطلوب عمل نموذج أب (نموذج عام للبرنامج)

وهو النموذج الاول في المثال السابق

نفتح هذا النموذج في وضع التصميم ومن الخصائص نحدد أنه IsMdicontainer=true

وفي كود تحميل النموذج الأب نكتب هذا الكود

Dim frm1 As New Form2

frm1.MdiParent = Me

frm1.Show()

==================================

وبهذا تم فتح النموذج الاب وعند فتحة يتم فتح أيضا النموذج العام form2

بقي ان نفتح النماذج الفرعية الأخري form3 and form4 عن طريق الازرار الموجودة علي النموذج العام

وهي كالأتي

في الزر الأول نكتب الكود التالي

Dim frm3 As New Form3

frm3.MdiParent = Me.MdiParent

frm3.Visible = True

وفي الزر الثاني نكتب الكود التالي

Dim frm4 As New Form4

frm4.MdiParent = Me.MdiParent

frm4.Visible = True

ونري كيف ان كل النمازج أصبحت فرعية تحت النموذج الأب

#5

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

كنت أبحث عن الحل لهذه امشكلة ولم أتوصل إليه فأشكرك من كل قلبي

هذا الموضوع مغلق.

مواضيع مشابهة