منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
مساعدة في picture drag and drop - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : مساعدة في picture drag and drop (/showthread.php?tid=611)

مساعدة في picture drag and drop - khalid0577 - 20-10-13

السلام عليكم و رحمة الله و بركاته
انا مبتدئ في Vb 2008
اريد عمل برنامج مسابقة للأطفال
و أريد أن اقوم بتحريك(draganddrop) صورة من مكان الى مكان فيه اسم الصورة في نفس الفورم اذا وضعت في المكان الصحيح تظهر رسالة قبول .ورسالة الرفض في حال و ضعها في مكان اخر الصورة في المرفقات
المرجو المساعدة جزاكم الله خيرا

RE: مساعدة في picture drag and drop - سعود - 20-10-13

كود :
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
ممكن تكتب اي كود لفحص نتيجة المكان الصحيح
مثال بسيط لاهم مهمة لفكرة اللعبة حسب مافهمت من سؤالك الباقي عندث اطلاق الماوس تكتب كود التحقق هل المكان الجديد صحيح ام لا

RE: مساعدة في picture drag and drop - khalid0577 - 20-10-13

بارك الله فيك
شكرا جزيلا لك يأخي الكريم
لقد وضعت الكود و عمل بشكل جيد.

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

RE: مساعدة في picture drag and drop - سعود - 20-10-13

فحص المكان الصحيح الظاهر طار من راسي بسبب انشغالي بعدة امور الفترة الماضية لكن
ممكن اي واحد يساعدنا بكود فحص اسم البارنت فان اكن الاسم الصحيح اذا ...

RE: مساعدة في picture drag and drop - khalid0577 - 20-10-13

شكرا جزيلا مجهود رائع
جزاك الله خيرا


RE: مساعدة في picture drag and drop - @@أبورائد@@ - 23-10-13

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


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

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

RE: مساعدة في picture drag and drop - khalid0577 - 24-10-13

شكرا جزيلا
هذا ما كنت أبحث عنه
جزاكم الله خيرا