[mostafa nada]

السلام عليكم اخوانى الكريم

هل يمكننى اضافة اكثر من tag عند اضافة زر بمعنى اذا كان لدى صنف وله سعر استخدم ال button.tag لاضافة السعر او اى شى محدد ماذا لو اردت ان اضيف اكتر من سعر للصنف الواحد هل يوجد ما يشابة بالتاج او ماهو الحل واتمنى ان تكون وضحت الامور وشكرا

[Anas Mahmoud]

ال tag  على حد علمي تأخد كائن من النوع object وبالتالي يمكن ان تسند له List(of double) مثلا بدلا من double 

كود :

 Dim list1 As New List(Of Double)({2.1, 3.4, 3.5, 7.7})

        Button1.Tag = list1

وعند الحاجة اليها في مكان اخر في الكلاس يمكنك استخدام DirectCast :

كود :

 Dim list1 = DirectCast(Button1.Tag, List(Of Double))

        MsgBox(list1(2))

وكل عام وانت بخير

[asemshahen5]

او يمكن ان يضيف خاصية جديدة للزر مثلا باركود و يضع بها رقم الباركود الخاص بالسلعة و هو افضل و اسهل .

[mostafa nada]

(30-07-20, 06:39 PM)Anas Mahmoud كتب : ال tag  على حد علمي تأخد كائن من النوع object وبالتالي يمكن ان تسند له List(of double) مثلا بدلا من double 

كود :

 Dim list1 As New List(Of Double)({2.1, 3.4, 3.5, 7.7})

        Button1.Tag = list1

وعند الحاجة اليها في مكان اخر في الكلاس يمكنك استخدام DirectCast :

كود :

 Dim list1 = DirectCast(Button1.Tag, List(Of Double))

        MsgBox(list1(2))

وكل عام وانت بخير

هل يوجد طريقة اخرى؟

[عيد مبارك]

كود :

1. Project > Add Class:
Public Class XButton
   Inherits Button
   Property Tag1 As String
   Property Tag2 As String
   Property Price1 As Double
   Property Price2 As Double
End Class

2. Debug > Build WindowsApplication1

3. Toolbox > WindowsApplication1 Components > XButton

[Anas Mahmoud]

(04-08-20, 12:49 AM)عيد مبارك كتب :

كود :

1. Project > Add Class:
Public Class XButton
   Inherits Button
   Property Tag1 As String
   Property Tag2 As String
   Property Price1 As Double
   Property Price2 As Double
End Class

2. Debug > Build WindowsApplication1

3. Toolbox > WindowsApplication1 Components > XButton

فكره رائعة فعلا 
احييك بشدة

[mostafa nada]

يا جماعة فى حدث اضافة ال button نفسو بقوم بجلب الصنف نفسو من خلال رقم الصنف وبيكون عند اضافة الزر ال button.name بيكون هو رقم الصنف لان الرقم لا يتكرر وال button.text هو اسم الصنف نفس وسعر الصنف اعطيت له button.tag

فسؤالى هنا انا لو عايز اضيف سعر تانى ماذا افعل؟
هل يوجد ما هو بديل للتاج ؟

[Anas Mahmoud]

(04-08-20, 02:28 AM)mostafa nada كتب : يا جماعة فى حدث اضافة ال button نفسو بقوم بجلب الصنف نفسو من خلال رقم الصنف وبيكون عند اضافة الزر ال button.name بيكون هو رقم الصنف لان الرقم لا يتكرر وال button.text هو اسم الصنف نفس وسعر الصنف اعطيت له button.tag

فسؤالى هنا انا لو عايز اضيف سعر تانى ماذا افعل؟
هل يوجد ما هو بديل للتاج ؟

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

[mostafa nada]

(04-08-20, 02:58 AM)Anas Mahmoud كتب :

(04-08-20, 02:28 AM)mostafa nada كتب : يا جماعة فى حدث اضافة ال button نفسو بقوم بجلب الصنف نفسو من خلال رقم الصنف وبيكون عند اضافة الزر ال button.name بيكون هو رقم الصنف لان الرقم لا يتكرر وال button.text هو اسم الصنف نفس وسعر الصنف اعطيت له button.tag

فسؤالى هنا انا لو عايز اضيف سعر تانى ماذا افعل؟
هل يوجد ما هو بديل للتاج ؟

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

اخى الكريم .. الاول هو عند اضافة الزر وعند الضغط على الزر بيتم عملpass للبيانات اللى انا ذاكرتها من قبل فى داتا جريد فيو 

وبردو عشان حضرتك تبقى فهمنى انا عندى صنف ومع عمل حدث اضافة ال button بحتاج امرر ٣ بيانات مهمة للداتا جريد فيو وهى رقم الصنف بياخد ال button.name واسم الصنف بياخد button.text وسعر الصنف اعطيت له button.tag 

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

فارجو ان يكون وضحت الامور لك يا اخى الكريم 
ماذا لو اردت ان اضيف سعر او مش  شرط سعر اى بيان اخر ماذا افعل؟

[عيد مبارك]

كود :

Dim b As New XButton
b.Tag1 = "Name"
b.Tag2 = "Description"
b.Price1 = 123
b.Price2 = 123.45