الاخوة الكرام كل عام وانتم بخير
فى بالى فكرة لا ادرى هل هى منطقية ام لا ؟
اقوم بتصميم برنامج مبيعات وعلى الفورم الرئيسى صورة معينة اريد عندما يستخدم العميل البرنامج ان تتغير هذه الصورة وفقا للنشاط الذى يمارسه
يعنى مثلا لو سوبر ماركت تكون صورة كذا لو صيدلية تكون كذا....الخ
هل من مساعد لى فى تحقيق هذه الفكرة
مع خالص شكرى
الموضوع سهل لكن سؤال : كيف سيحدد العميل نوعية النشاط
في بداية تشغيل البرنامج بعد التنصيب طبعاً لأول مره تشغيل البرنامج تضع كومبو بوكس يحمل الأنشطة مثلاً :
سوبر ماركت
صيدلية
.... إلخ
وتضع صورة لكل نشاط وبعد تحديد النشاط تقوم بعرض الصورة .
(01-07-17, 05:44 AM)silverlight كتب : [ -> ]الموضوع سهل لكن سؤال : كيف سيحدد العميل نوعية النشاط
شكرا اخى الكريم على الرد والعميل سيحدد نوع النشاط فى فورم بيانات النشاط الذى سيقوم بملء بياناته فى البداية
(01-07-17, 02:40 PM)حريف برمجة كتب : [ -> ]في بداية تشغيل البرنامج بعد التنصيب طبعاً لأول مره تشغيل البرنامج تضع كومبو بوكس يحمل الأنشطة مثلاً :
سوبر ماركت
صيدلية
.... إلخ
وتضع صورة لكل نشاط وبعد تحديد النشاط تقوم بعرض الصورة .
شكرا اخى العزيز حريف برمجة...هى الفكرة طبعا حلوة ةباذن الله ساجرب واخبرك بالنتيجة
سؤال أخير
هل العميل سيخدد النشاط اثناء مرحلة Setup للبرنامج أم عند تشغيل البرنامج؟
(02-07-17, 08:07 AM)silverlight كتب : [ -> ]سؤال أخير
هل العميل سيخدد النشاط اثناء مرحلة Setup للبرنامج أم عند تشغيل البرنامج؟
سيحدد العميل النشاط عند بداية تشغيل البرنامج فى اعدادات المنشأة وكتابة البيانات التى ستطبع بالفواتير
هذه هي الفكرة
أنت تحتاج الي 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, 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
خالص الشكر اخى العزيز باذن الله ساجرب الكود واخبرك بالنتيجة ان شاء الله
تمام ياريس الله يبارك فيك ويكرمك اشتغل الكود تمام....جزاك الله خيرا