ماذا تعرف عن الMdi Form

معلومة هامة جميع البرامج الضخمة و الكبير تعتمد اساساً علي الـ

Mdi Form

مثل

VB,PhotoShop,Office Package,........ETC

تم رفع الصور ووضعها بالمرفقات

شكراً أخي , ومن نقاط ضعف هذا النوع من النماذج حكاية عدم إمكانية وضع أداوت وأيضاً إنه إذا أنت أنشأت شريط قوائم للـ MDI وآخر لـ FORM فإن هذا سوف يؤثر سلبياً على القوائم في الاثنين , وسيعتمد البرنامج شريط قوائم الـ MDI

وهذه نقطة ضعف قوية

ولكن هذا لا يلغي المزايا الكثيرة لها

مع تحيات ...

علاء VB

عزيزي Ala2 VB

الميدي فورم تستخدم فقط لترتيب العام للبرنامج وربط الفورم الفرعية بالبرنامج يعني انا مش محتاج منها سوي شريط العنوان وشريط الادوات فقط وشكرا علي ردك و اهتمامك يا عزيزي

بصرحه شرح و لا أجمل يااخي و لكن هناك عيب زي ما قال الاخ Ala2

لذلك أفضل الكود التالي

/index.ph...mp;#entry627132

Ala2 VB كتب:

شكراً أخي , ومن نقاط ضعف هذا النوع من النماذج حكاية عدم إمكانية وضع أداوت وأيضاً إنه إذا أنت أنشأت شريط قوائم للـ MDI وآخر لـ FORM فإن هذا سوف يؤثر سلبياً على القوائم في الاثنين , وسيعتمد البرنامج شريط قوائم الـ MDI

وهذه نقطة ضعف قوية

ولكن هذا لا يلغي المزايا الكثيرة لها

مع تحيات ...

علاء VB

الفكرة أن الـ MDI Forms لا تقبل سوى الأدوات التى تحتوى على الخاصية Align و بالتالى يمكن وضع Picturebox ( يحتوى على الخاصية ) ووضع أى ادوات عليها.

يا جماعة لازم نفرق بين المدي فورم و الفروم العادي

هكذا تكون الميدي فورم

كما نري احتواء الميدي فورم للفورم الاولي ونلاحظ الفورم الثانية يمكنة الخروج عن الفورم

بصراحة احيك اخي msayed2004

السلام عليكم

طيب ما اهمية Mdi form غير القوائم لان القوائم ده ممكن نضيفها على الفورم العادى ؟؟!!

وشكرا

bRyAn كتب:

السلام عليكم

طيب ما اهمية Mdi form غير القوائم لان القوائم ده ممكن نضيفها على الفورم العادى ؟؟!!

وشكرا

تعمل كنافذة حاضنة للنوافذ العادية الأخرى و تتميز يدعم تلقائى للـ Scrolling

برامج زى الـ Microsoft Office عبارة عن MDI Forms و غيرها زى الـ Adobe Reader وكثير.

مشكور على الشرح الجميل

و اريد ان اطلب كود يتعلق في هذا الموضوع

اريد كود يغلق جميع النوافذ المفتوحة داخل النافذة الرئيسية

و شكرا مقدما

اروجوا الرد العاجل

جاري تحضير وتجربة الكود تجربة الكود

بعد البحث الشديد لم اجد سوي

Unload Form1
Unload Form3
Unload Form2

ستقوم بغلق فورمة فورمة بواسطة Unload

ومازال البحث مستمراً

طيب و انا انتظر الرد الكافي علي و شكرا

POP EL VB

msayed2004

اعتقد ان خيركم من يبدأ بالسلام والاعتذار

وارجو من الاخ POP EL VB ان احنا في ساحة عامة فيجب مرعاة شعور الغير واشكرك علي اهتمامك بالموضوع

ارجو msayed2004 ان يطيل صبرك وتكون حليما وا شكركك علي ردودك المفيدة

اخيراً اعتقد ان خيركم من يبدأ بالسلام والاعتذار

انا حاسس اننا بقينا اعدين علي مساطب وكل واحد بيرد علي التاني في المنتدي الجميل ده يا جماعة خيركم من تعلم العلم وعلمه انا شفت العضوين اللي بيردم علي بعض بطريقة مش اللي هي وللأسف الشديد هذا احزنني جدا ولكن زي ما اخي الحبيب قال خيركم من بدأ بالسلام نتمني ان العلاقة تدوم بينا بإخوة في المنتدي الجميل ده والله الهادي

سلام عليكم

تشكرات تشكرات موضوع هايل وشكرا علي الشرح الوافي ده بس عندي سؤال مهم جدا وهي ظهرت معايا لو انا عملت شريط قوائم عيل الميدي فورم زي قايمة ملف وتحرير وعرض واستعلام الخ ..

المشكلة اللي ظهرت معايا عند تنصيب المبرنامج علي جهاز العميل ان اتجاه القوائم دي بقي من الشمال لليمين بطريقة غريبة شوية مع اني مظبط خاصية Right to left = true يعني ناحية المين عشان البرنامج باللغة العربية ولكني فوجت بهدذا المشكلة علي جهاز العميل هل هذا عيب من عيوب الميدي فورم ولا ايه بالظبط منتظر الرد .....

شكرا سلامو عليكم

احب انوه اني اخطأت ووضعت رد علي موضوع لا يخض الموضوع ده وحصل تبادل بينهم اسف لهذا الخطأ

اقتباس

لمشكلة اللي ظهرت معايا عند تنصيب المبرنامج علي جهاز العميل ان اتجاه القوائم دي بقي من الشمال لليمين بطريقة غريبة شوية مع اني مظبط خاصية Right to left = true يعني ناحية المين عشان البرنامج باللغة العربية ولكني فوجت بهدذا المشكلة علي جهاز العميل هل هذا عيب من عيوب الميدي فورم ولا ايه بالظبط منتظر الرد .....

لأ ده مش عيب الميد فورم واكبر دليل علي كده شوف اوفيس اكس بي العربي

اعتقد انك ممكن تراجع المشروع تاني

تأكد من وجود الملف : VBAME.DLL بجهاز العميل , أعتقد أنه المسؤل عن العرض من الشمال الى اليمين.

( أتمنى أن يكون أسم الملف صح )

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

تعديل :

matrixyb كتب:

و اريد ان اطلب كود يتعلق في هذا الموضوع

اريد كود يغلق جميع النوافذ المفتوحة داخل النافذة الرئيسية

و شكرا مقدما

تعديل 2 : أتمنى أن صاحب الموضوع لا يتضايق من أجابتى على الأسئلة بموضوعه.

MDI_Form___Close_sub_forms___AT2K.rar

هجرب وارد عليكم وشكرا علي الرد السريع

اخ kindy_ibrahim

اشكر لك بداياتك الرائعه وطريقة طرحك للموضوع بشكل جميل

وهذا ان دل فهو يدل على طريقة تفكيرك في ايصال المعلومه بشكل صحيح وسهل

كما اتوجه بشكري وتقديري للأخ msayed2004

فهو رمز النشاط واحس انه المساعد الايمن لي :lol: لا تتصور كم تريحني عندما اجد موضوع قمت انت بالرد عليه

فأنا على يقين بأن مشكلة ذاك العضو قد ازيلت

فاتفاعلك بالرد على استفسارات الاعضاء وتوجيهتك لهم اضافة للمنتدى الكثير

فأنت الصورة الحقيقة للعضو المثالي :rolleyes: التي تعكس هذه الجملة

اقتباس

لا لزيادة المشاركات من الهواء فكر قبل الرد

حيث لا اجدها تطبق من قبل البعض .. <_< فهم يقولون ما لا يفعلون

اتمنى لك التوفيق والاستمراريه اخي msayed2004

وايضا لك اخي kindy_ibrahim

ولكل من شارك بفائد في الموضوع

فاتفاعلكم مكسب لنا ولإدارة الفريق العربي للبرمجه .....

msayed2004 كتب:

تعديل 2 : أتمنى أن صاحب الموضوع لا يتضايق من أجابتى على الأسئلة بموضوعه.

بالطبع لا فهذه الردود ربما تكسبني بعض المهارات التي احتاجها حيث خبرتي لا تزيد عن العام في الفجوال بيسك

وبصراحة ان بعتبرها منافسة عايز ارد علي الموضوع قبل ما انت تشوفة واضع المثال وربي انا احب المنافسة وبمناسبة

msayed2004 كتب:

كود يغلق جميع النوافذ المفتوحة داخل النافذة الرئيسية

هو ده التحايل البرمجي اللي كنت بتكلم عليه بقليل من التفكير نقدر نعمل اي حاجة

فأنت

HnHn كتب:

رمز النشاط

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

HnHn كتب:

اشكر لك بداياتك الرائعه وطريقة طرحك للموضوع بشكل جميل

وهذا ان دل فهو يدل على طريقة تفكيرك في ايصال المعلومه بشكل صحيح وسهل

هذه شهادة اعتز بها طوال عمري

وانهي كلامي بـ

HnHn كتب:

فاتفاعلنا مكسب للمنتدي ولإدارة الفريق العربي للبرمجه .....

ودعانا نعمل في منافسة والابتعاد عن كلام الحاقدين ولا تتوقف

ودعنا نرفع شعار أسأل أستشير ولا نبخل كباقي الحاقدين

اذا كنت تريد اغلاق جميع الفرم عدا الميدى اذا ربما ينفعك الكود التالى

هذا الكود لاغلاق جميع الفورم الميدى شيلد Mdichild

Private Sub Command2_Click()
 On Error Resume Next
 Dim form As form
 For Each form In Forms
	If form.MDIChild = True Then
		Unload form
	End If
 Next
 Set form = Nothing
End Sub