05-07-17, 08:54 PM
(آخر تعديل لهذه المشاركة : 05-07-17, 09:41 PM {2} بواسطة salah mansour.)
(05-07-17, 04:52 AM)silverlight كتب : هذه هي الفكرةخالص الشكر اخى العزيز باذن الله ساجرب الكود واخبرك بالنتيجة ان شاء الله
أنت تحتاج الي Enum لتحديد نوع النشاط
ومنه تحدد الصورة
و تضع جميع الصور في Resources المشروع
و الكود سيكون بالشكل التالي
PHP كود :Public Class Form1
Private Enum ActivityTypes
Suprmarket
Pharmacy
' أضف جميع الانشظة الأخري
End Enum
Private Function GetBackgroundImage(activity As ActivityTypes) As Bitmap
Dim result As Bitmap = Nothing
Select Case activity
Case ActivityTypes.Pharmacy
result = New Bitmap(My.Resources.pharmacy)
Case ActivityTypes.Suprmarket
result = New Bitmap(My.Resources.supermarket)
' أكمل بنفس الأسلوب ان كان لديك أنشطة أخري
End Select
Return result
End Function
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
' بعد ان يحدد العميل النشاط و بناء علي اختيار العميل
' تختار النشاط
Dim activity As ActivityTypes = ActivityTypes.Pharmacy
Me.BackgroundImage = GetBackgroundImage(activity)
End Sub
End Class
(05-07-17, 08:54 PM)salah mansour كتب :تمام ياريس الله يبارك فيك ويكرمك اشتغل الكود تمام....جزاك الله خيرا(05-07-17, 04:52 AM)silverlight كتب : هذه هي الفكرةخالص الشكر اخى العزيز باذن الله ساجرب الكود واخبرك بالنتيجة ان شاء الله
أنت تحتاج الي Enum لتحديد نوع النشاط
ومنه تحدد الصورة
و تضع جميع الصور في Resources المشروع
و الكود سيكون بالشكل التالي
PHP كود :Public Class Form1
Private Enum ActivityTypes
Suprmarket
Pharmacy
' أضف جميع الانشظة الأخري
End Enum
Private Function GetBackgroundImage(activity As ActivityTypes) As Bitmap
Dim result As Bitmap = Nothing
Select Case activity
Case ActivityTypes.Pharmacy
result = New Bitmap(My.Resources.pharmacy)
Case ActivityTypes.Suprmarket
result = New Bitmap(My.Resources.supermarket)
' أكمل بنفس الأسلوب ان كان لديك أنشطة أخري
End Select
Return result
End Function
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
' بعد ان يحدد العميل النشاط و بناء علي اختيار العميل
' تختار النشاط
Dim activity As ActivityTypes = ActivityTypes.Pharmacy
Me.BackgroundImage = GetBackgroundImage(activity)
End Sub
End Class