اين المشكلة في زر اغلاق النموذج رقم 2

#12 يناير 2008 في 16:58 صاحب الموضوع

انا عاملة برنامج به عدة فورم الفورم الاساسي هو الواحهة الرئيسية للبرنامج هذا الفورم به menu item وعدة ليبل علي واجهة الفورم والمشكلة كالاتي :-

1- عند الضغط علي ليبل رقم 1 وهو يحمل اسم " ادارة النقل"

2- انا عامل نفس الاسم في menuitem1

بالشكل التالي:-

قوائم الادارات

ادارة النقل

ادارة المبيعات

وهكذا،،،،،،

المشكلة هنا في :-لما المستخدم يضغط علي ليبل ادارة النقل تكون menuitem1 "ادارة النقل " تكون غير enabledحتي لايتم فتح النموذجين في نفس الوقت

انا عملت الاتي في كود الضغط علي ليبل " ادارة النقل "

dim f2 as new form2

f2.show

menuitem2.enabled=false

وبالفعل حدث المطلوب ولكن_________________

في حدث زر اغلاق نموذج " ادارة النقل "btn_close

كتبت الاتي :-

me.close

menuitem2.enabled=true

ولكن ظل كما هو enable=false

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

WindowsApplication2.zip

#22 يناير 2008 في 17:41

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

اخي الكريم ما تحتاج اليه ان تضع تعريف في الموديل بشكل مشابه للتالي :

Public myMenu As MenuItem

ثم في الحدث Load للفورم الرئيسية ضع التالي :

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

و بعدها في كل مكان تريد فيه ان تتعامل مع القائمة استخدم myMenu بدلا عن MenuItem2 يعني بشكل مشابه للتالي :

		Dim f2 As New Form2
		f2.Show()
		myMenu.Enabled = False

و العكس صحيح

		myMenu.Enabled = True
		Me.Close()

نصيحة اخيرة لن يعمل الكود السابق لانك وضعت الامر تبع ارجاع القائمة الى حالتها الطبيعية في زر الاغلاق فقط و هناك حالات لن يظغط عليه المستخدم مثلا قد ينقر على زر اغلاق النافذة نفسها

لهذا ضع في الحدث Closing تبعد النافذة Form2 امر الارجاع بالشكل التالي :

	Private Sub Form2_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
		myMenu.Enabled = True
	End Sub

تحياتي

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

مواضيع برمجية تقنية جديدة

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

• إستغلال خدمة الـ RSS في برامجنا ومواقعنا ! (VB.NET)

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

• برنامج للبحث في الملفات ومحتواياتها (VB.NET)

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

• فئة للتراسل بين برنامجين في جهاز واحد ! (VB.NET)

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

مواضيع برمجية تقنية قديمة

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

• إستغلال رسائل البالونات Balloons في الوينذوز أكس بي(VB.NET)

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

• مقالة : لماذا يجب ان نعتني بشفرات برامجنا !؟- (VB6.0)

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

• لمطوري البرامج و مواقع الويب - برنامج تركيب ألوان - (VB6.0)

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

• برنامج : بسيط للتحكم بالنظام, عن طريق الريجستري - (VB6.0)

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

• برنامج : لتقييد و منع تشغيل البرامج الاخرى - (VB6.0)

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

• النوافذ المنبثقة و طريقة لإستغلالها في برامجنا -(VB.NET)

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

• تقنية الإستدعاء الذاتي - (VB.NET , VB6.0)

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

• مصفوفات الأدوات Control Arrays افكار وتلميحات ! - (VB.NET)

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

• أفكار و تلميحات[ المعنى الحقيقي للـ True و False ] - أمثلة (VB.NET VB6.0)

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

• دوال الـ APIs و مايقابلها في الدوت نت ! - (VB.NET)

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

#35 يناير 2008 في 13:37

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

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

وهي عند عمل التقرير لهذه القاعدة تتظهر مشكلة في خطوات انشاء التقرير عندما يطلب اسم ومسار قاعدة البيانات والمشكلة عندما ادخل password في هذه النافذة واضغط علي next تظهر رسالة بالخطأ في حين انني قمت بمسح password من قاعدة البيانات وبالفعل نجحت فما هي المشكلة:

اين المشكلة في زر اغلاق النموذج رقم 2

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