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

كيف اعمل تصغير للبرنامج يكون فى sys tray

مغلق
بدأه alimax في 15 يونيو 2005 · 10 رد · 837 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

لقد قراءت موضوع اخ يسئل عن نفس الموضوع

عند ما يضغط على - البرنامج ينزل بجوار الساعه

ولم بضغط كليك يمين يظهرلى الاختيارات الاتيه

show يفتح البرنامج مره اخرى

exit يغلق البرنامج

about يظهر عن البرنامج

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

وانا بفهم باذن الله

#2

راجع هذا الموضوع

سؤال في تصغير البرنامج بجانب الساعة

اللهم اغفر لي و لوالدي و للمؤمنين يوم يقوم الحساب

لا إله إلا الله عدد ما كان و عدد ما يكون و عدد الحركات و السكون

#3

اخى يظهر انك لم تقراء كل كلامى

انا ذكرت

اقتباس "

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

وانا بفهم باذن الله"

ياريت تساعدنى

#4

يعني تبغى شرح للأمثلة !!!!

اللهم اغفر لي و لوالدي و للمؤمنين يوم يقوم الحساب

لا إله إلا الله عدد ما كان و عدد ما يكون و عدد الحركات و السكون

#5

اولا شكر على اهتمامك

واللى عاوز اهمله فى البرنامج كاالاتى

عند ما يضغط على - البرنامج ينزل بجوار الساعه

ولم بضغط كليك يمين يظهرلى الاختيارات الاتيه

show يفتح البرنامج مره اخرى

exit يغلق البرنامج

about يظهر عن البرنامج

شرح والكود اللى يقوم بهذه الوظيفة

وشكر لك

#6

أخي الكريم ما طلبته موجود في المثال المرفق في الموضوع السابق ، على العموم

أنت تحتاج إلى فورم وتضيف عليها من ToolBox

- ContextMenu1

- NotifyIcon1

و تضيف عناصر القائمة التي تريدها إلى ContextMenu1

ثم من خصائص الـ NotifyIcon1 تعين الـ ContextMenu إلى ContextMenu1

وفي حدث Form1_Resize

    Private Sub Form1_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Resize
       With Me
            If .WindowState = FormWindowState.Minimized Then  ' للتأكد من حالة الشاشة إذا كانت تصغير وضعها في Systray
                NotifyIcon1.Text = .Text    ' تعيين اسم الفور لاسم الأيقونة
                NotifyIcon1.Visible = True  ' إظهار الأيقونة
                .ShowInTaskbar = False  ' لإخفاء البرنامج من شريط المهام
            End If

        End With
        
    End Sub

وفي حدث القائمة لإظهار الفورم

    Private Sub MenuItem2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem2.Click
        With Me
            .WindowState = FormWindowState.Maximized  '  لإظهار الفورم
            .ShowInTaskbar = True   ' لوضع الفورم على شريط المهام

            .NotifyIcon1.Visible = False   ' لإخفاء الأيقونة من جانب الساعة Systray
        End With
    End Sub

أتمنى أن أكون قد أفدتك

اللهم اغفر لي و لوالدي و للمؤمنين يوم يقوم الحساب

لا إله إلا الله عدد ما كان و عدد ما يكون و عدد الحركات و السكون

#7

بارك الله فيك استاذى بن ملعاط

انا نفذت والحمد لله كان فى توفيق من عند الله

وفى بعض الملاحظات

انا ضيفت فى ContextMenu

3 قوائم

1-قفل> وكتب الكود الخاص بيها me.close واشتغل تمام

2- عرض > وعاوز الكود اللى اول ما اضغط عليها يعطينى الفورم اللى كنت واقف عليها قبل التصغير

3 - عن البرنامج > وعاوز لم اضغط عليه يعطينى فورم انا عاملها اسمها about

وبارك الله فيك على مساعدتك ليا

#8

الحمد لله انا جربت وعرفت اعمل بتاعت (عن البرنامج ) واشتغلت تمام خالص

وده الكود اللى استخدمته

Dim form1 As New about

form1.Show()

Me.Hide()

فاضل اخر نقطة وهى بتاعت العرض

#9

رجاء المساعده

#10

أخي الكريم انت بتستعمل MDI from و الا فورم عادية

اللهم اغفر لي و لوالدي و للمؤمنين يوم يقوم الحساب

لا إله إلا الله عدد ما كان و عدد ما يكون و عدد الحركات و السكون

#11

ما هو MDI from ؟

انا تقريبا استخدم فورم عادية

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

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

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…