تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] مساعدة في تغير لون جميع شاشة المشروع
#1
السلام عليكم 
 ارجو المساعدة في كود لتغير لون جميع شاشة المشروع
ولكم جزيل الشكر
الرد }}}
تم الشكر بواسطة:
#2
و عليكم السلام
PHP كود :
Imports System.Drawing
Imports System
.Windows.Forms

Module ThemeManager
    
' دالة لتغيير لون جميع عناصر التحكم
    Private Sub ChangeAllControlsColor(ByVal controls As Control.ControlCollection, ByVal color As Color)
        For Each control As Control In controls
            control.BackColor = color
            If control.HasChildren Then
                ChangeAllControlsColor(control.Controls, color)
            End If
        Next
    End Sub

    ' 
دالة لتغيير لون النموذج بالكامل
    Public Sub ApplyTheme
(ByVal form As FormByVal color As Color)
 
       ChangeAllControlsColor(form.Controlscolor)
 
   End Sub
End Module 


PHP كود :
Private Sub Form1_Load(sender As ObjectAs EventArgsHandles MyBase.Load
    
' تغيير اللون إلى الأزرق، يمكنك تغيير اللون حسب الحاجة
    ThemeManager.ApplyTheme(Me, Color.Blue)
End Sub 
الرد }}}
تم الشكر بواسطة: MOHAMMED ALZWI , ابو روضة
#3
شكرا جزيلا
الرد }}}
تم الشكر بواسطة:



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


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