تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
أريد كود لغلق جميع النوافذ عند تسجيل الخروج
#1
السلام عليكم
لو سمحتوا أريد عند الضغط علي تسجيل الخروج يقوم البرنامح بغلق جميع الشاشات ويقوم بفتح شاشة تسجيل الدخول
كنت استعمل كود وكان شغال زي الفل بس لما غيرت البرنامح واستخدمت ال DevExpress  الكود لايعمل 
فما الحل
PHP كود :
My.Application.OpenForms.Cast(Of Form)() _
            
.Except({LoginFRM}) _
            
.ToList() _
            
.ForEach(Sub(formform.Close()) 
الرد }}}
تم الشكر بواسطة:
#2
[font=Söhne, ui-sans-serif, system-ui, -apple-system,]First, make sure that you have a module or a class that keeps track of all open forms. You can create a module called  [/font]"FormManager" and declare a list to store the references to the open forms

كود :
Module FormManager
   Public OpenForms As New List(Of Form)()

   Public Sub AddForm(ByVal form As Form)
       OpenForms.Add(form)
   End Sub

   Public Sub RemoveForm(ByVal form As Form)
       OpenForms.Remove(form)
   End Sub
End Module
[font=Söhne, ui-sans-serif, system-ui, -apple-system,]Next, in your main form (the one that opens initially), add an event handler for the FormClosing event. Inside the event handler, you can close all open forms and open the login form:[/font]

كود :
Public Class MainForm
   Private Sub MainForm_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       FormManager.AddForm(Me)
   End Sub

   Private Sub MainForm_FormClosing(sender As Object, e As FormClosingEventArgs) Handles MyBase.FormClosing
       For Each form As Form In FormManager.OpenForms
           form.Close()
       Next

       Dim loginForm As New LoginForm()
       loginForm.Show()
   End Sub
End Class
الرد }}}
تم الشكر بواسطة: asmarsou , Emam emam , ابو روضة
#3
اخي aljzazy  يعجز لساني عن شكرك 

بارك الله فيك وجعله الله في ميزان حسناتكم

الحمد لله الكود شغال زي الفل
الرد }}}
تم الشكر بواسطة: aljzazy


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  إغلاق الفورم مع حذف جميع البيانات الموجودة به صالح عبدالله 10 1,038 19-04-25, 08:54 PM
آخر رد: Kamil
  [VB.NET] مشكل ظهور Query SQLITE في إظهار جميع التواريخ b4getws 3 519 28-02-25, 10:36 AM
آخر رد: b4getws
  [VB.NET] استعراض بيانات في Datagridview واضافة جميع البيانات لجدول محدد sql skode 0 489 12-01-25, 12:50 AM
آخر رد: skode
  اريد كود يحذف جميع سجلات جدول بقاعدة بيانات اكسس دفعه واحده khalidalwdi 2 634 18-11-24, 01:02 AM
آخر رد: rdxdz
  لدي كود للإضافة أريد كود للتعديل وكود للحذف F.H.M 4 354 09-11-24, 09:50 AM
آخر رد: F.H.M
  أريد كود عند الضغط على الصورة في PictureBox تفتح في برنامج الصور في الويندوز F.H.M 6 630 25-10-24, 01:57 PM
آخر رد: F.H.M
  أريد تحديد صلاحيات المستخدمين عن طريق حقل في جدول قاعدة البيانات F.H.M 0 326 12-09-24, 06:29 PM
آخر رد: F.H.M
  [VB.NET] أريد جعل التاريخ بالمنتصف في DateTimePicker F.H.M 2 429 29-08-24, 06:27 PM
آخر رد: F.H.M
  [VB.NET] مساعدة في تغير لون جميع شاشة المشروع MOHAMMED ALZWI 2 484 29-08-24, 02:33 PM
آخر رد: MOHAMMED ALZWI
  أريد معرفة الطريقة ؟! saud1004 2 358 26-07-24, 12:15 PM
آخر رد: saud1004

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم