[محمد خيري]

السلام عليكم و رحمة الله

اخواني أنا عملت فورم بها 2 داتاجريد فيو بحيث انقل الصفوف التي عملت تشيك بكس من الدجاتاجريد رقم 1 إلى الداتاجريد رقم 2

النقل كلو تمام و الحمد لله فقط لم اعرف كيف احذف الصفوف التي تم نقلها للداتاجريد رقم 2 احذفها من الداتاجريد رقم 1 

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

الرجاء مساعدتي بكود الحذف الله يبارك فيكم يا رب

[Taha Okla]

وعليكم السلام ورحمة الله وبركاته

بالنسبة للحذف من أي قائمة بشكل عام الأفضل أن تحذف تراجعياً (حيطة)
لأنه لا يوجد برنامج كامل أو أداة مصنوعة بشكل قياسي .. فالبعض يكون فيها قصور 
لذا إن حذفت من النهاية للبداية ستكون حتماً قد حذفت كل ما أردت فعله (لأن الرقم المرجعي للعنصر التالي لن يتغير رقم مرجعه)
لأنك لو حذفت من البداية للنهاية فأغلب القوائم تعتمد على الرقم المرجعي للصف
فإذا حذفت الصف الثاني وأردت حذف الثالث أو الرابع (فإن الرقم المرجعي للصف الثالث وكذالك الرابع سيختلف بمجرد حذف سطر قبله)
فإن لم يكن صانع هذه الأداة قد راعى هذا الأمر من البداية وضمن مجال تصوره (يعني خياله واسع جداً على التصور): 
فإن ذلك سيكون مشكلة لمن يستخدم هذه الأداة من بعده. (مهما كان المبرمج محترف فإن له هفوات - لا يوجد انسان كامل فضلاً عن مبرمج)

الكود الذي استخدمته للحذف كود رائع ومميز ولكن من مبدأ الحيطة أن تستخدم الكود التالي
لأنه سيناسب كل أداة مهما كان تصور مبرمجها :

كود :

For i1 = (DataGridView1.Rows.Count - 1) To 0 Step -1
   Dim isselect As Boolean = DataGridView1.Rows(i1).Cells(3).Value
   If isselect = True Then
       DataGridView1.Rows.RemoveAt(i1)
   End If
Next

[ali_ahmed12]

(12-11-22, 05:32 PM)Taha Okla كتب : وعليكم السلام ورحمة الله وبركاته

بالنسبة للحذف من أي قائمة بشكل عام الأفضل أن تحذف تراجعياً (حيطة)
لأنه لا يوجد برنامج كامل أو أداة مصنوعة بشكل قياسي .. فالبعض يكون فيها قصور 
لذا إن حذفت من النهاية للبداية ستكون حتماً قد حذفت كل ما أردت فعله (لأن الرقم المرجعي للعنصر التالي لن يتغير رقم مرجعه)
لأنك لو حذفت من البداية للنهاية فأغلب القوائم تعتمد على الرقم المرجعي للصف
فإذا حذفت الصف الثاني وأردت حذف الثالث أو الرابع (فإن الرقم المرجعي للصف الثالث وكذالك الرابع سيختلف بمجرد حذف سطر قبله)
فإن لم يكن صانع هذه الأداة قد راعى هذا الأمر من البداية وضمن مجال تصوره (يعني خياله واسع جداً على التصور): 
فإن ذلك سيكون مشكلة لمن يستخدم هذه الأداة من بعده. (مهما كان المبرمج محترف فإن له هفوات - لا يوجد انسان كامل فضلاً عن مبرمج)

الكود الذي استخدمته للحذف كود رائع ومميز ولكن من مبدأ الحيطة أن تستخدم الكود التالي
لأنه سيناسب كل أداة مهما كان تصور مبرمجها :

كود :

For i1 = (DataGridView1.Rows.Count - 1) To 0 Step -1
   Dim isselect As Boolean = DataGridView1.Rows(i1).Cells(3).Value
   If isselect = True Then
       DataGridView1.Rows.RemoveAt(i1)
   End If
Next

اخ طه ماسبب خطأ في مشكلتي

[Taha Okla]

(12-11-22, 05:52 PM)ali_ahmed12 كتب : اخ طه ماسبب خطأ في مشكلتي

أكيد لأني لا أعلم الغيب..

[ali_ahmed12]

(12-11-22, 06:08 PM)Taha Okla كتب :

(12-11-22, 05:52 PM)ali_ahmed12 كتب : اخ طه ماسبب خطأ في مشكلتي

أكيد لأني لا أعلم الغيب..

سوف ارفق لك مثال

---

(12-11-22, 06:32 PM)ali_ahmed12 كتب :

(12-11-22, 06:08 PM)Taha Okla كتب :

(12-11-22, 05:52 PM)ali_ahmed12 كتب : اخ طه ماسبب خطأ في مشكلتي

أكيد لأني لا أعلم الغيب..

سوف ارفق لك مثال

https://drive.google.com/drive/folders/1...cIFIy7FjPd

[محمد خيري]

(12-11-22, 05:32 PM)Taha Okla كتب : وعليكم السلام ورحمة الله وبركاته

بالنسبة للحذف من أي قائمة بشكل عام الأفضل أن تحذف تراجعياً (حيطة)
لأنه لا يوجد برنامج كامل أو أداة مصنوعة بشكل قياسي .. فالبعض يكون فيها قصور 
لذا إن حذفت من النهاية للبداية ستكون حتماً قد حذفت كل ما أردت فعله (لأن الرقم المرجعي للعنصر التالي لن يتغير رقم مرجعه)
لأنك لو حذفت من البداية للنهاية فأغلب القوائم تعتمد على الرقم المرجعي للصف
فإذا حذفت الصف الثاني وأردت حذف الثالث أو الرابع (فإن الرقم المرجعي للصف الثالث وكذالك الرابع سيختلف بمجرد حذف سطر قبله)
فإن لم يكن صانع هذه الأداة قد راعى هذا الأمر من البداية وضمن مجال تصوره (يعني خياله واسع جداً على التصور): 
فإن ذلك سيكون مشكلة لمن يستخدم هذه الأداة من بعده. (مهما كان المبرمج محترف فإن له هفوات - لا يوجد انسان كامل فضلاً عن مبرمج)

الكود الذي استخدمته للحذف كود رائع ومميز ولكن من مبدأ الحيطة أن تستخدم الكود التالي
لأنه سيناسب كل أداة مهما كان تصور مبرمجها :

كود :

For i1 = (DataGridView1.Rows.Count - 1) To 0 Step -1
   Dim isselect As Boolean = DataGridView1.Rows(i1).Cells(3).Value
   If isselect = True Then
       DataGridView1.Rows.RemoveAt(i1)
   End If
Next

تمام اخ طه ربنا يبارك فيك و يرزقك من حيث لا تحتسب الكود اشتغل مثل ما اريد جزاك الله خيرا

[ali_ahmed12]

(12-11-22, 07:00 PM)محمد خيري كتب :

(12-11-22, 05:32 PM)Taha Okla كتب : وعليكم السلام ورحمة الله وبركاته

بالنسبة للحذف من أي قائمة بشكل عام الأفضل أن تحذف تراجعياً (حيطة)
لأنه لا يوجد برنامج كامل أو أداة مصنوعة بشكل قياسي .. فالبعض يكون فيها قصور 
لذا إن حذفت من النهاية للبداية ستكون حتماً قد حذفت كل ما أردت فعله (لأن الرقم المرجعي للعنصر التالي لن يتغير رقم مرجعه)
لأنك لو حذفت من البداية للنهاية فأغلب القوائم تعتمد على الرقم المرجعي للصف
فإذا حذفت الصف الثاني وأردت حذف الثالث أو الرابع (فإن الرقم المرجعي للصف الثالث وكذالك الرابع سيختلف بمجرد حذف سطر قبله)
فإن لم يكن صانع هذه الأداة قد راعى هذا الأمر من البداية وضمن مجال تصوره (يعني خياله واسع جداً على التصور): 
فإن ذلك سيكون مشكلة لمن يستخدم هذه الأداة من بعده. (مهما كان المبرمج محترف فإن له هفوات - لا يوجد انسان كامل فضلاً عن مبرمج)

الكود الذي استخدمته للحذف كود رائع ومميز ولكن من مبدأ الحيطة أن تستخدم الكود التالي
لأنه سيناسب كل أداة مهما كان تصور مبرمجها :

كود :

For i1 = (DataGridView1.Rows.Count - 1) To 0 Step -1
   Dim isselect As Boolean = DataGridView1.Rows(i1).Cells(3).Value
   If isselect = True Then
       DataGridView1.Rows.RemoveAt(i1)
   End If
Next

تمام اخ طه ربنا يبارك فيك و يرزقك من حيث لا تحتسب الكود اشتغل مثل ما اريد جزاك الله خيرا

استخدم listbox  وليس قريد فيو فهمت تقصد علي اخ ....................