تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مساعدة في picture drag and drop
#1
السلام عليكم و رحمة الله و بركاته
انا مبتدئ في Vb 2008
اريد عمل برنامج مسابقة للأطفال
و أريد أن اقوم بتحريك(draganddrop) صورة من مكان الى مكان فيه اسم الصورة في نفس الفورم اذا وضعت في المكان الصحيح تظهر رسالة قبول .ورسالة الرفض في حال و ضعها في مكان اخر الصورة في المرفقات
المرجو المساعدة جزاكم الله خيرا


الملفات المرفقة صورة/صور
   
الرد }}}
تم الشكر بواسطة:
#2
كود :
Public Class Form1
    Dim ax, ay As Integer
    Dim dr As Boolean
  
    Private Sub PictureBox1_MouseDown(sender As Object, e As MouseEventArgs) Handles PictureBox1.MouseDown
        If e.Button = Windows.Forms.MouseButtons.Left Then
            dr = True
            ax = Windows.Forms.Cursor.Position.X - PictureBox1.Left
            ay = Windows.Forms.Cursor.Position.Y - PictureBox1.Top
        End If
    End Sub

    Private Sub PictureBox1_MouseMove(sender As Object, e As MouseEventArgs) Handles PictureBox1.MouseMove
        If dr Then
            PictureBox1.Left = Windows.Forms.Cursor.Position.X - ax
            PictureBox1.Top = Windows.Forms.Cursor.Position.Y - ay
        End If
    End Sub

    Private Sub PictureBox1_MouseUp(sender As Object, e As MouseEventArgs) Handles PictureBox1.MouseUp
        dr = False
    End Sub
End Class

هذا الكلاس مثال لتحريك مربع صورة انظر للاحدث المستخدمة والتعريفات الموجودة

يعني عند حدث اطلاق الزر الايسر PictureBox1_MouseUp
ممكن تكتب اي كود لفحص نتيجة المكان الصحيح

مثال بسيط لاهم مهمة لفكرة اللعبة حسب مافهمت من سؤالك الباقي عندث اطلاق الماوس تكتب كود التحقق هل المكان الجديد صحيح ام لا


الملفات المرفقة صورة/صور
   

.zip   WindowsApplication1.zip (الحجم : 37.45 ك ب / التحميلات : 436)
الرد }}}
#3
بارك الله فيك
شكرا جزيلا لك يأخي الكريم
لقد وضعت الكود و عمل بشكل جيد.

ممكن تكتب لي كود لفحص نتيجة المكان الصحيح.
المثال المرفق لم يعمل معي
شكرا جزيلا
الرد }}}
تم الشكر بواسطة:
#4
فحص المكان الصحيح الظاهر طار من راسي بسبب انشغالي بعدة امور الفترة الماضية لكن
ممكن اي واحد يساعدنا بكود فحص اسم البارنت فان اكن الاسم الصحيح اذا ...
الرد }}}
تم الشكر بواسطة: @@أبورائد@@ , khalid0577
#5
شكرا جزيلا مجهود رائع
جزاك الله خيرا
الرد }}}
تم الشكر بواسطة:
#6
السلام عليكم ورحمة الله وبركاته


أنظر هذا الموضوع (@@@ لعبة تعليمية بسحب الصور واسقاطها على اسمها @@@)

السلام عليكم ورحمة الله وبركاته
الرد }}}
تم الشكر بواسطة: سعود , hoob computer , khalid0577
#7
شكرا جزيلا
هذا ما كنت أبحث عنه
جزاكم الله خيرا
الرد }}}
تم الشكر بواسطة: @@أبورائد@@


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] مساعدة في تقرير mrfenix93 1 41 24-03-24, 10:29 PM
آخر رد: mrfenix93
  مساعدة jalaltech 1 95 07-03-24, 07:38 PM
آخر رد: قناص المدينة
  [VB.NET] مساعدة فى كود فاتورة اللكترونية asdfar1977 2 194 02-03-24, 02:00 AM
آخر رد: asdfar1977
  مساعدة فى كود فاتورة الكترونية asdfar1977 0 80 29-02-24, 07:14 PM
آخر رد: asdfar1977
  مساعدة jalaltech 0 133 17-02-24, 02:15 AM
آخر رد: jalaltech
  طلب مساعدة AHMED213 3 323 06-02-24, 09:39 PM
آخر رد: AHMED213
  [VB.NET] طلب مساعدة AHMED213 0 221 31-01-24, 12:56 AM
آخر رد: AHMED213
  طلب مساعدة بخصوص كود الطباعة paveldida 2 461 19-01-24, 12:00 AM
آخر رد: العتيق
  [VB.NET] مساعدة في استدعاء البيانات معينه من form الأول إلى form 2 بدون التعديل loay775 2 275 18-01-24, 05:04 PM
آخر رد: loay775
  اريد مساعدة في العملية الحسابية melad2002 3 406 29-12-23, 09:10 PM
آخر رد: melad2002

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


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