تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
حلقة نقاش- السحب والإفلات في بيئة الدوت نيت
#1
كاتب الموضوع : samerselo

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


هذا مثال سريع مدعم بالتعليقات العربية لسحب عناصر من قائمة ListBox1 وإضافتها لقائمة ثانية ListBox2

كود :
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
' تجهيز صندوق القائمة الثاني ليقبل الإلقاء
Me.ListBox2.AllowDrop = True
End Sub


Private Sub ListBox1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles ListBox1.MouseMove
' عند الضغط على زر الفأرة اليساري عند تحريك الفأرة قم بتحميل النص في حدث السحب
If e.Button = Windows.Forms.MouseButtons.Left Then
Me.ListBox1.DoDragDrop(Me.ListBox1.Text, DragDropEffects.Copy)
End If
End Sub

Private Sub ListBox2_DragEnter(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles ListBox2.DragEnter
' عند الدخول للقائمة ووجود بيانات سحب نصية قم بإظهار مؤشر مناسب
' يدل على قبول صندوق القائمة للعملية
If e.Data.GetDataPresent(DataFormats.Text) Then
e.Effect = DragDropEffects.Copy
Else
e.Effect = DragDropEffects.None
End If

End Sub

Private Sub ListBox2_DragDrop(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles ListBox2.DragDrop
' إن كانت البيانات نصية أضفها إلى صندوق القائمة
If e.Data.GetDataPresent(DataFormats.Text) Then
Me.ListBox2.Items.Add(e.Data.GetData(DataFormats.Text))
End If

End Sub
}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [نقاش] نقاش حول تطبيق الفاتورة الإلكترونية فى السعودية المرحلة الثانية Zatca Integration AmrSobhy 0 1,000 11-11-22, 01:31 AM
آخر رد: AmrSobhy
  التعامل مع الصور Images في بيئة الدوت نت باستخدام +GDI - مقدمة RaggiTech 3 5,858 30-07-21, 05:14 PM
آخر رد: kebboud
  التــعامل مع cmd من خلال الدوت نت مبتدئ في الاحتراف 3 3,778 02-06-18, 12:36 AM
آخر رد: YousefOkasha
  تفقيط الارقام فى الدوت نت مبرمج أوتار 17 12,388 20-04-17, 12:21 PM
آخر رد: محمد بوقزاحة
Big Grin [مقال] كفية التعامل مع حلقة التكرار For , For Each alims 8 9,971 01-11-15, 11:51 PM
آخر رد: adel27
Brick [مثال] السحب والافلات على ايقونه البرنامج اكثر من مره والافلات على النافذه الطالب 0 2,335 15-08-15, 09:58 PM
آخر رد: الطالب
Brick [مثال] السحب والاسقاط من اداة picturebox الى مجلد مفتوح الطالب 0 2,062 23-05-15, 06:06 PM
آخر رد: الطالب
  [مقال] تشغيل برمجيات الدوت نت بدون تنصيب النت فروم ويرك m0075 13 10,482 13-02-14, 08:29 PM
آخر رد: Omar Mekkawy
  مقال- أفكار في الدوت نت كبف تصنع ColorPicker RaggiTech 0 2,272 05-10-12, 06:53 PM
آخر رد: RaggiTech
  مقال- أفكار في الدوت نت Overrides DisplayRectangle Property RaggiTech 1 2,567 05-10-12, 06:50 PM
آخر رد: RaggiTech

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


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