السلام عليكــم ورحمـة الله وبركاتــه
عندي Form1 , Form2 وأعمل على Form1 وأثناء العمل أحتاج إلى ظهور Form2 فوقها بشرط أن تظل فوقها وفي نفس الوقت أستطيع العمل على Form1
بمعنى أوضح عندما تظهر Form2 فوق Form1 أريدها أن تثبت فوقها وفي نفس الوقت أستطيع أن أدخل أي بيانات في Form1 داخل TextBox مثلا وخلافها ومعلوم أنني لو قمت بتنشيط Form1 سيؤدي ذلك إلى ظهور Form2 خلفها وأنا هنا أريدها لا تظهر خلفها بل أريدها في المقدمة مع إمكانية العمل على Form1
وشكرا
تم تعديل هذه المشاركة بواسطة Visual Studio في 26 ديسمبر 2008 في 21:09
السلام عليكــم ورحمـة الله وبركاتــه
أظن أخي لو أنك عملت على مبدأ MDIParent ووضعت الـ Form1 , Form2 أولاد في فورم الأب
إذا انت كنت تقصدك هيك عطيني خبر من شان اعطيك مثال على ذلك
أتمنى لك التوفيق والنجاح
من وجد الله فماذا فقد -- ومن فقد الله فماذا وجد
Don't Say I Don't Know But Say I Will Try
أخي الكريم
نعم Form1,Form2 أولاد للفورم Mdi وأريد ظهور Form2 كما ذكرت سابقا
وإذا كانت هناك طريقة بدون اشتراط أن يكونا أبناء للفورم Mdi فحبذا ذكرها
وشكرا
السلام عليكم
أنا بصراحة ما عم تتكون عندي الفكرة يمكن مخي شوي سميك ما بعرف
بس انت لما تنشط المعلومات في الفورم 1 بعد التنشيط ممكن تعمل ()Form2.show ما بعرف بتمشي حالها ولا لأ
إذا عندك المثال ضعه هنا لكي تكتمل الصورة
من وجد الله فماذا فقد -- ومن فقد الله فماذا وجد
Don't Say I Don't Know But Say I Will Try
مرحباً أخي الكريم .
يمكنك تغير الخاصية TopLevel الى False لكي تعامل معاملة أي Control أي :
Private Sub Button1_Click(ByVal Sender As System.Object, ByVal E As System.EventArgs) Handles Button1.Click
Dim NForm As New Form1
NForm.TopLevel = False
Me.Controls.Add(NForm)
NForm.Show()
End Sub
أو كما ذكر أخونا Am_Proactive استخدام الـ Form كـ MDI Container أي :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If Not IsMdiContainer Then IsMdiContainer = True
Dim NForm As New Form1
NForm.MdiParent = Me
NForm.Show()
End Sub
يمكنك حذف If Not IsMdiContainer The IsMdiContainer = True بعد تغير الخاصية IsMdiContainer الى True من Designer ( محرر التصميم ) .
تم تعديل هذه المشاركة بواسطة Bashar Rabat في 27 ديسمبر 2008 في 00:56
The important thing is not so much
that every child should be taught,
as that every child should be given the wish to learn.
جزاكم الله خيرا إخواني الكرام
سأجرب ما ذكرتموه لي وأخبركم بإذن الله
أخي الكريم Bashar Rabat
الكود الذي ذكرته لي ينشيء فورم وأنا لا أريد إنشاء فورم بل عندي Form2 عليها بعض الأداوت وأريد ظهورها فوق Form1 لأنقل منها مثلا بعض البيانات داخل Form1 وهذا يستدعي أن تظل Form2 أمام Form1 باستمرار مع إمكانية تنشيط Form1 كما ذكرت سابقا لأكتب فيها مثلا بعض من البيانات التي سآخذها من Form2
هل وضحت الصورة أكثر ؟
وشكرا
حسنا كل ماعليك فعله هو تغير الخاصية TopMost للـ Form2 الى True .
طبعاً بدون استخدام أي من السابق ( Code ) .
Private Sub BtnForm2_Click( Byval Sender As System.Object, Byval E As System.EventArgs ) Handles BntForm2.Click
My.Forms.Form2.Show()
End Sub
تحياتي BasharVS .
تم تعديل هذه المشاركة بواسطة Bashar Rabat في 27 ديسمبر 2008 في 23:18
The important thing is not so much
that every child should be taught,
as that every child should be given the wish to learn.
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…